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Arrow of death 
Assembly 





STAMPANTI Epson, 

una scelta prestigiosa, senza compromessi 





FX-an 

Indispensabile nelle applicazioni in 
cui la versatilità 9 la qualità di stampa 
sono un imperativo 

Possibilità di creare qualsiasi carat- 
tere su una matrice di 11x9 punti. Memo 
ria RAM da 4 Kbyte. 256 iipi di caratteu 
definibili dall'utente. 136 tipi di caratteri 
a corredo. Alta velocità di stampa a 160 
caratteri ai secondo su 80 colonne. Ben 
9 modi di stampa grafica punto a punto 
selezionabile sulla stessa riga eontem- 
poraneamente. 

[nseritori automatici d: fogli singoli 
gola e doppia vaschetta. 


Scegliere una 
stampante è facile? 

C'è una sola regola, pretendere 
sempre il massimo delle prestazioni, 
senza compromessi tnatenali e compo- 
nenti di prima qualità, disegno elegan- 
te, grande affidabilità, robustezza, faci- 
lità e flessibilità d'impiego, prezzo ade- 
guato e la garanzia di un grande costrut- 
tore ieader mondiale, 

Cosi con Epson, la scelta è facile e 
sicura. 

Epson il più grande costruttore al mon- 
do di stampami vi offre una gamma di 
prodotti prestigiosi che soddisfano ogni 
vostra necessità. Epson, una soluzione 
raffinata, in esclusiva per iE vostro com- 
puter. 


RX-BO/RXIOD 

Le migliori prestazioni da stampanti, 
semplici, versatili, silenziose e veltri ■ 
con 100 caratteri al secondo. 12£ tipi di 
caratteri selezionabili e 11 sei inta-na- ■< 
ZLonaìi, 30 o 132 colonne. 6 diverse puni- 
bilità grafiche. Tutti l tipL dL carta, modih n 
lo continuo, foglio singolo. Inseritori su - 1 
tornatici di fogli singoli 


Con 132 colonne e L6Q ca- 
ratteri al secondo, La FX--1G0 
è La stampante Ldeaie pe 
•data processing e tàbula- 
li. specialmente in uffi- 
cio grazie anche alle 
possibilità di accettare 
fogli singoli e moduli 
continui di 


fiche e 

sima varietà di tipi di carattere, fino a 
256, definibili anche daìi'u tenie e me- 
morizzati nei -3 kbyte di RAM interna.. La 
rX— 100 non temo la fatica la testina di 
slampa è garantita per oltre 100 milioni 
di caratteri ed è. facilmente sostituibile. 
Inseritori automatici di fogli singoli. 


FX-1QD 


EPSON 


Epson dunque, senza compromessi. 
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Sìncla irtamente vostro/ Ja po^ta 
fiffjinji fwre 
Posta Avventuro* 

Software: QUICKSORT 
(Fifaia Berna) 

Hardware: I» m E P ROM 

(Sergig foragli!) 

Interventi; Il mercato del QL 
(Salvatore Mofìteleon»! 

Didattica: ASSEMBLY 
(Si in luci Cirri) 

Advanturesi ARR □ W Q F DE A T H 


(Giuliane loschi} 

Computer music: MUSIC CDMPlLER 
(Guido Grassi) 

Software: GIGANTOGRAFIE 
iMirco Bertani } 

I_ 1 1 itat i s_ 

Conto Corrente ili parte) 
humic Compiier 
Gigantografie 
Ouickeprt 

READ/DAT A per ZXSi 
Travi continue 
Tape -test 

Software: TRAV I CO NTINU E 
(Do® é n i c D Sabatino} 

Software; TAPE- TES T 
(Luigi Cai 3 egar i ) 

Notizie 

■*. Didattica: Un tasto per volta 
(Filippo Venturi} 

Interventi: Cari Sveltir isti... 

(Vincenza GarUscheHi) 

Sinclairparade/Ia classifica 
Videogatries /recensioni 

(Luigi di legari ) 

Sinclair ec lame/piccoli annunci 
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_A POSTA LA POSTA LA POSTA LA 


STA LA POSTA LA POSTA LA POS 



linciali- 


Che cosa significa RANDOMIZE 
USR seguilo da un numero di idea- 
zione? 

Esiste un libro sulla ROM dello 
Spectrum? 

Quando si parla di Interface 1 di' 
s attivata bisogna fisicamente disin- 
serire la scheda? 

Che cosa significa ulillzzare urta 
REM nel linguaggio macchina? 

(P. Cartelli - Bologna) 

USR serve per lanciare una routi- 
ne in fing, macchina; non è, però, un 
comando autonoma, e non si può 
scrivere 

10 USA xxx 

Bisogna (ai lo procedere da 
PR1NT, a RUN. o qualsiasi altra 
istruzione che richieda un argomen- 
io numerico. Normalmente viene 
utilizzata RANDOMPZE perchè non 
altera nienio nell'area basic. 

11 libro su Ila ROM dello Spectrum 
è The complete Spectmm ROM di- 
sassembly, della Melbourne House. 

Per interface il «di sali Ivate" si In- 
tende io stalo in cui gi trova all'ac- 
censione. o dopo aver dato PRiNT 
USR a il computer si comporta co- 
mese la scheda non fosse inserita, 
finché non si esegue un comando 
residente nett’lnt, 1 oppure non si 
Incorre in una qualsiasi situazione 
di errore. 

Utilizzare un REM per il linguag- 
gio macchina consiste semplice- 
mente nei memorizzare rii program- 
ma all' interno della linea REM sles- 


sar solitamente è fa prima finea del 
programma basic (cosi è possibile 
sapere a quale locazione di memo- 
ria inizia}, e lo statement viene fatto 
seguire da tanti caratteri (guai siasi ) 
quanti sono ì codici del lAn. I quali 
vengono trascritti in sequenza (con 
PGKE) nelle locazioni occupate dal- 
la linea REM, 

Le altre domande che poni (non 
riportale) richiederebbero ciascune 
un articolo: un pò di pazienza e ri- 
sponderemo a tutto. 



Perchè l'Interface 2 non è compa- 
tibile con tutti i giochi? La si pud 
programmare per renderla tale? 

Pierluigi Giordano - Portici na } 
li motivo tecnico è che i giochi in 
commercio prevedono l'uso, di vol- 
ta in volta, di seria diverse dì tasti; 
perchè manchi l’unificazione, oc- 
corre chiederlo alle software house 
che progettano i giochi stessi. 

L'interfaccia non è programmabi- 
le: su questo concetto, vista questa 
e altre lettere, ci pare esista un pò 
di confusione L'interfaccia pro- 
grammabile è un dispositivo che 
consente di variare I codici Inviati 
dal Joystick (solitamente cinque} 
quando viene azionato; la modifica 
può avvenire con dispositivo mec- 
canico o elettronico. Nei primo ca- 


so è ben evidente, trattandosi di 
azionare spinotti o piccoli Ini emit- 
tori, nel secondo c'è una memoria 
Statica da programmare con appo- 
site sequenze di tasti. L'Interface 2 
non è quindi programmabile in nes- 
sun modo. 

C'è un progetto por aulocos [rim- 
ai una penna ottica? Come leggere i 
codici a barre con le SPECTRUM? 
(Davide De Martini - Peda vena BL ) 

Progetti per penne ottiche circo- 
lano in abbondanza sui libri e sulle 
riviste di elettronica pratica, ma 
l'affidabilH* con lo Spedami è 
scarsa, e quelle messe in commer- 
cio non hanno avuto un gran suc- 
cesso (a causa anche di carenze dei 
software di supporto), 

Quanto alle penne per I codici a 
barre, ve ne sono di ottime, purtrop- 
po però piuttosto costose; quando 
il computer è predisposto per colle- 
gare un dispositivo BGR (bar code 
reader}, come nel caso dei portatili 
Oli veti I o Epson, li collegamento è 
diretto; diversamente si ha un'Inter- 
faccia che comunica, di solito, at- 
traverso una porta seriale; ciò au- 
menta ancora il coslo. 

Quali sono gli Indirizzi della ROM 
utilizzabili con RAND USR? Come si 
pud fere un SAVE dello schermo 
che I ras ferisca sul nastro tutte le 24 
linee, comprese quindi quelle di edi- 
ting? (Stefano Putzu - igie.il a a CA) 


Dicendo "5 risultati ufflT En una 
risposta sui n. 09, facevamo una ge- 
neralizzazione che ci sembrava pa- 
lesemente ironica: il senso era che 
una chiamata con USR fatta "a ca- 
so"* è priva rii senso; comunque, 
predisponendo In modo appropriate 
i registri dello Z80, si può '"entrare" 
In molti punti dal sistema operativo, 
ma occorre conoscere a fonrio il 
ling, macchina e avere sottocchio il 
rii s assemblalo completo detta ROM 
(disponibile nelle collana della Mel- 
bourne). 

Per salvare uno schermo comple- 
te delio linee 22/23 occorre che ii 
programma lo trasferisca in un'al- 
tra area della memoria, senza inter- 
rompersi, per non produrre messag- 
gi su quatte linee. 

Del trasferimento di una pagina 
video si è parlato più volte (fin dal n. 
02): può essere eseguito con poche 
Istruzioni di assannbiy o con un (ten- 
to) ciclo FOfì/NEXT, a «orza rii PEEK 
a POKE; per es. 

10 LET A = U£R "a” - 6913: 
□ LEAR A 

20 FÒRT=1G3B4TO 23295 

30 LEI A= A + 1: POKE A, PEEKT 

40 N-EXT T 

Fatto questo. Il salvataggro si ri- 
solve con un normale SAVE "" CO- 
DE 

Esiste un programma per 
LOAD/SAVE rapido? Che cosa pen- 
sate dalla macchine ria scrivere 
elettroniche da userà come stam- 
panti? (Giuseppe Palermo - Bolo- 
gne) 

Esistono diversi "turbo-leader", 
come si è soliti chiamare queste 
utility. Se ne è generalizzato fuso 
nell'ultima generazione di giochi, 
con lo scopo rii limitare le copie pi- 
rata. Coma al solito, funziona... fin- 
ché qualcuno non scopre ii trucco. 

Molte macchine per scrivere oi 
chiarano sulla carta di poter essere 
utilizzate come stampanti, Se Cofiè- 
gate al computer: spesso j>stO ei 
scopre che la scheda di Interfaccia 
non è già piesente, ma, secondo l 
casi, annunciata, in arrivo, allo ste- 
dio. o anche disponìbile subito, ma 
a un prezzo pari a quello delia mac- 
china stessa. 

Quindi, se la macchina non ha 
già un ingresso parallelo p seriale 


Emergenza neve 


Le nevicate eccezionati dei mese 
di gennaio hanno colto di sorpresa 
anche nel. In giorni In c ut occorre- 
va lavorare a pieno ritmo per recu- 
perare l'inevitabile ritardo dovuto 
alla pausa di fine anno. L' impossi 
bitità di comunicate tra redazione, 
composizione , tipografia ha avuto 
per consegu e n za il rifa rdo 
ntìPtiaelte te edicola con il numero 
re ctef/a nfvtòfa e una serie di picco* 
te mancarne redazionali e/o tipo* 
predone. 

A pagina 7 r neli'erticolo interro* 
giriamo la tastiera», sono un pò di- 
sastrati i brevi listati Inseriti nel fe 
Sic; sila riga Ss,, prima colonne, 
leggete. 

10>IF INKÈV^= ,I,I T 
HEN SD TD iO 

20 IF INKEYtO’"' 
THEW GQ TD istru 
zi otte 


alla riga 13 r 

1S>IF CODE INKEY 
4f<40OR CODE INKEY* 
>57THEN SO TD i str 
uzione 

alia riga 4, colonna Centrate: 

“la iooazione 23556 contiene. ■■ 
fctc.r 

Silo seconda riga dal basse, co- 
lonna centrale: 
a-z Q7-I22 

stia riga 1Ù, terza cotenna: 

10>PAUSE 20! IF P 
EEK 2355 t< >255TJH£N 


FRI NT PEEK 235*0 
2à 00 TO 10 

A pag. 42, li Usiate «REAÙ/DATA 
per ZXBh< (nato, evidentemente, 
sfortunato} avrebbe dovuto estera 
pubblicate In una versione corretta 
(quella 9 >è apparsa Su/ n. 7 non 
/unitene bone, Come hanno segne- 
iato a/CUili lettori). Per un disguido, 
l 'elenco dei codia è ancora Quell C 
sbagliato. Lo pubblichiamo linai- 
menfe correrie (v. a pag. 37), chie- 
dendo scuse e guanti hanno tenta- 
to inutilmente di tarlo funzionare. 

A pag. 43, colonna centrale r pri- 
ma di "p/ disabilita...", manca li se- 
guente listato. Ci scusiamo Ctw? 
l'autore. 


FR06 A 


DI 

CALL S2 
JR B 


DI 

CALL 82 
JR B 


RET 

dèc'ep 

DEC BP 
EX (BP) ,HL 
INC HL 
INC HL 
EX tSP) ,HL 
EI 


standard, informatevi bene prima di 
acquistarla. 

A parte ciò, una macchina per 
scrivere, dai punto di vista dai com- 
puter, è molto tenta, e ciò può co- 
stringere a rivedere il software di 
colloquio, per non perdere caratteri; 
riguardo a questi, fare un listato di- 
venta un problema, se non si hanno 
i caratteri speciali, e II set di una 
margherita (o pai lina) è fisso. 

L'unico vantaggio lo si ha 
nell’uso con un word-processor, of- 
frendo un qualità di stampa dei te- 
sti nettamente superiore anche alle 
migliori stampanti per computer. 


(Gianluca Rocchi - Roma) a) Cerca 
su; rei eneo di software inserito nel 
9; b) non si pud! 

{Alberto Succhioni - Vercelli) Un ot- 
timo compilatore è il FP ( = Flos- 
ting Point) Compilar della Sofie*. 
Dovrebbe essere reperibile nei ne- 
gozi più forniti, 

(Roberto Caselli - Sanremo IM) Lo 
Spectrum PLUS è totalmente com- 
patibile con fa versione normale; 
cambiano solo la carrozzeria e qual- 
che detl agl io costruii ivo I ni nf I uen te 
Sul sistema operali vo. 


Sinclair Con^lWBr - 5 


(F. e V, Santo ? 0 ■ Pantaleo PA „ e 
altri) a) Tecnicamente non vi Sono 
difficoltà a utilizzare la tastiera del- 
lo Spectrum PLUS ai posto di quella 
normale: non sappiamo so e quan- 
do (alo tastiera varrà messa a di- 
sposizione degii utenti “vuota", -nè 
a ette prezzo; Un 'ottima alternativa 
disponibile subito è costituita dai 
vari model II di tastiera professiona- 
le, in commercio da tempo; b) cfr. 
SC n, 9, pg.-g, &&, 

Paolo Stinco ■ Valenza Po Al) Si, 
RAI 3 la domenica alle 14. 

(Luca D' Ammara - Milano) La di- 
stribuzione del numeri casuali è 
uniforme sia per I numeri “atti" che 
quelli "bassi”, ma essendo numeri, 
appunto, casuali, può capitare che 
escano a volte più "basai" che 
“alti”... altrimenti che "caso' : sa- 
rebbe? 

(Bolo Carrara - Albino (BQ) a) Esiste 
un libro Simile nella collana 
McGraw-HIII; b) di che floppy Si tral- 



(Chlara Barbieri ■ Pavia) Ci potrebbe 
essere un difetto del modulatore, o 
disturbi esterni su quel canale: a 
volte è sufficiente spostare di poto 
il canale di liscila (36UHF). agendo 
sui modulatore del computar. Ov- 
viamente, la soluzione monitor è 
sempre la migliore... prescindendo 
dall 'aspetto economico. 

(Aldo Magoga - Torino) Se il joystick 
è programmabile esisteranno le 
istruzioni ma quél è? ne esistono 
parecchi , c radicalmente diversi tra 
loro; se non é programmabile, beh, 
non lo è,.. 

fFreffO romaròfe - Monte S, Angolo 
PG) È tutto normale; negli assegna- 
menti vengono necessariamente 
fatti degli arrotondamenti. E poi. 
anche perchè “prescindere da pro- 
blemi di arrotondamento"? Nei cal- 
coli che esigono precisione è d'ob- 
bligo tener conto dcli’opsilon di 
macchina per arrotondare. 


Posta Adventures 


Due quesiti: 

1) in THE HOBBIT, non riesco ad 
entrare nel barile; 

2) In SHERLOCK non ho visto di 
segni. È forse solo colloquiale? 

(Umberto Donzelli - Boi tifino Sera 
SS) 

Per entrare nel barile, bisogna 
prenderlo, aprirlo, svuotarlo e quin- 
di lasciarlo. Quando sullo schermo 
apparirà la sorbita che dice cito 
qualcuno sta buttando i barili nelle 
botola, digitare iump barre 1. Tutte 
queste azioni vanno faite In mo- 
menti diversi, perché saremo spes- 
so riportati in prigione. 

SHERLQCK è un adontare an- 
che grafica, ma in maniera decisa- 
mente limitata. 

Potresti mandarmi la piantina de 
IL LUNGO RITORNO? (Angelo Bian- 
co - Casfetfaoefa - JA) 

MI dispiace, ma nqn à possibile 
Inviare mappe di adventure. Se hai 
dei problemi, scrivi e ti sarà rispo- 
sto sulle pagine di questa rivista. 


Sono un ragazzo di 15 anni ap- 
passionalo fèrri bri mente di adven- 
ture. Vorrei porti alcune domande: 

1» Riguardo a MESSAGE FROM 
ANDROMEDA a casa servono il de- 
tonatore, la chiave ultrasonica % 1 
vari pannelli. Per non parlare dal 
piatto sorretto da un piedistallo, 
eie, 

2) Parliamo di THE GOLDEN SA- 
TQN. Non riesco a prendere il qusrz 
per uccidere il Lizard man. Dove si 
lima la pergamena che il computer 
mi chiede? 

3) In ARROW OF DEATH... 

4) Infine THE HOBBIT: dopo aver 
ucciso il drago e preso il lesero, 
vengo ucciso -dal “pale bulbous 
ayes". Il computer suggerisce di 


aspettare, me elle lunga le faccen- 
da diventa noiosa, (Stefano Palise- 
la - Monza MI) 

1) Forse chiedi troppo; ti dò solo 
un piccolo aiuto per continuare: con 
la chiave ultrasonica recati nella 
sala con la piate e digita potai rad 
ai piate. 

2) per prendere il quarz, agita la 
bacchetta fwa ve s tali)' devi pai dire 
la parole Akirz (say Akinl Recati 
quindi dal Lizard man e agita il 
quei* fatavo guarii)- La pergamena 
si trova nella stanze del palazzo in 
cui si trova la Medusa. Devi avere lo 
specchio. 

3) Per Arrow of dealfr, come puoi 
vedere a pag. 1&, stiamo pubblican- 
do la soluzione complete scila rivi- 
sta. 

4) Tfle Hobblt non devi aspettare 
più volte, ma una sola volta, dopo 
aver effettuato ogni spostamento. 

Possiedo l'fldventtire TEN LITTLE 
INEHAN5, della Digital Fantasia- 
Duale è l'obiettiva -ilei la storia? 

(Marco Plafoni - Poma) 

Per completare l' adventure. biso- 
gna trovare io statuette, tutte ugua- 
li ma di diverso colore, e portarle 
nella stanze giusta. 

Giocando i'adve-nture FEASYBl- 
LITY EXPEfilMENT non riesco ad 
uccidere il Leone. Come devo fare 
{Eleni prò scnic che ho la scimitarra). 

(Marcella Caponecchia ■ Terra An- 
nunziata IVA) 

Non è poi cosi diti ielle. Bisogna 
digitare “kilt lion wlth scimi! ar". 

Per le vostre domande 
sugli zdvermire scrivete a 
Giuliano Bosetti, 
via F. Massi 12, 

00T52 fiore a. 


(Cerava tì Giuseppe - Coagulo VA J 
Cfr. la risposta al lettore G.P. di Bo- 
logna, data sopra. Per la PRAXIS 20 
(come per le altre "elettroniche’'). 


che non cl risulta essere già predi- 
sposta a lar da stampante, il lavoro 
e il costo sono tali da sconsigliare 
la cosa.. 


m 


e - SVKiai.' Computer 


I 


Ecco un altro algoritmo per ordi- 
nare array: il migliore esisterne at- 
tualmente al mondo. Il suo nome 
{QuScksort, cioè ordinamento velo- 
ce) la dice lunga sulle sue presta- 
zioni : è spettacolarmente più velo- 
ce di ogni altro metodo di ordina- 
mento conosciuto {per confrontare 
la. sua velocita con gii algoritmi più 
noti vedere la tab. 1). 

Scritto originariamente In versio- 
ne ricorsiva in Pascal, ò qui re&O in 
una versione equivalente iterativa 
(non essendo possibile la ricoreio- 
ne in basic). 

Per e tri non sa tos'è la rieorsione, 
diciamo perora (semplicisticamen- 
te) otta è una struttura in cui una 
routine richiama se stessa (una 
spiegazione esauriente non è possi- 
bile in poche parole). 

L'algoriimo si fonda su questa 
idea: selezionando un elemento 
dell'array (più avanti vedremo altri 
metodi, per ora pensiamolo come 
l'elemento che sta a meta delCar- 
ray), lo si può facilmente dividere in 
due parti: una >n cui gii elementi so- 
no tutti MINORI dev'elemento scel- 
to {la chiavai l'altra in coi sono 
MAGGIORI. Gli elementi minori del- 
la ctìtàve saranno posti aha sua si- 
nistra {intendiamo sinistra logica, 
secondo l'ordine degli indici), quin- 
di verso l' inizio deH'arrey, gli altri al- 
la sua destra. 

Si può ora agire nello stesso mo- 
do su ciascuna delle due parti 
dell'array, considerandola come se 
fosse l'intero array e divìdendola a 
sua volta In duo parti rispetto a 
un'altra chiave scelta al suo inter- 
no; si procede cosi, finché ogni sot- 
toerray considerato sarà costituito 
da un solo elemento; l'array sarà 
ora Interamente ordinato. Esemplo: 

array iniziale: 

361947285 

scegliamo come chiave l'elemen- 
to di mezzo :4> e spostiamo alla sua 
destra tutti gii elementi maggiori, e 
a sinistra i minori; 

321497685 

Consideriamo ora ii sottoamay 3 
2 i 4, scegliamo come chiave Tele' 
mento "2" e suddividiamo tome pri- 
ma, ottenendo: 

1234 

La stessa operazione va ripetuta 
sull'altro solioarray; come potete 



Utility 



Ouicksort 

di Fatte Berne 

Dopo lo shell-sort pubblicato sul 
n. 9, un sofisticatissimo programma 
che surclassa tutti gii altri 


constatare, la convergenza al rifluì- i*st apa®. sei 

lato desideralo % rapidissima. 

Una implementazione rfeorarva 
dell'algoritmo si presenta abba- 
stanza semplice, poiché ia chiama- 
ta ricorsiva conterrà come parame- 
tri I limiti destro e sinistro della par- 
te di array su cui dovrà operare la 
procedura. 

Questo però, per definizione del 
linguaggio, non é consentilo in ba- 
sic, perciò si dovrà tenere traccia 
del lavoro eseguito, memorizzando! 
limiti destro e sinistro della porzio- 
ne di array su cui si lavorerà in se- 
guitò', dato che è possibile operare 
su una sola parte per volta delle due 
cne scaturiscono ad ogni bipartizio- 
ne del sottoarray. 

Visto che l'operazione di divisio- 
ne prosegue finché la I unghezza del 
sotloarrey trattato è 1, si memoriz- 
zeranno in sequenza gii indici In 
d ue array ausi I i ari (uno per g I i indici 
di destra, l'altro per quelli di sini- 



TAB. 1 

ALGORITMO 

ARRAY 

CASUAL* 

ARRAY 

ORDINATO 

ARRAY ÒRU. 
INVERSAMENTE 

quicNsort 

65 

T43 

366 

35 

79 

172 

40 

06 

n 

snelison 

234 

6tù 

1365 

115 

260 

573 


333 

n 

bubbiesori 

9&1 

mi 

n 

53Ò 

2003 

o 

1330 

6G0C 

n 

n &$}mr>i> 

255 

512 

1024 

256 

S 12 

W24 

256 

Sfjf 

T Ù24 


n = non rilevato 


Stra), per poi prelevare ogni volta 
l'ultimo demento posto in ogni ar- 
ray, ed eseguire l'operazione di par- 
tizione su quella parrà dell'atra* da 
ordinare, I cui Indici sono stati pre- 
levati dai due array "di servizio 1 '. 

In pratica, lutto ciò equivale alla 
gestione esplicita di uno stac.fr, co- 
stituito appunto dai due array ausi- 
liari, Indicati con / (} e r £1, 

La routine è costituita da tre cicli 
nidificali Che operano, rispettiva- 
mente, prelevando la prima coppia 
di Indici dagli array ausiliari {che 
ainnizio contengono I limiti dell’ar- 
ray intero), dividendo poi la porzio- 
ne considerata in due, secondo la 
chiave scella (qui quella in mezzo), 
e memorizzando sullo sfacfc (cioè 
ancora nei due array aggiuntivi) i li- 
miti su cui si dovrà operare in segui- 
to (qui sono gli indici della nuova 
porzione Oesira, poiché l'algoritmo 
elabora prima la parte sinistra), arri- 
vando infine al terzo ciclo, che Spo- 
sta a sinistra gli elementi minori 
della chiave e a destra quelli mag- 
giori. 

in realtà lo sposi amento avviane 


prima detta memorizzazione degli 
Indici, poiché capila Irequeniamen- 
le che la chiave stessa possa esse- 
re spostate- 

La tabella presenta te prestazioni 
comparate, riferite agli algoritmi 
più diffusi (uno shetisort è slato 
pubblicalo su SC n. 09, un bubbie- 
$orl lo trovate, a md' di documenta- 
zione... sierica, tra i listati, insieme 
ai quicksort). 

Le ire diverse prove metlono in 
evidenza come il risultato campi se- 
condo lo stalo In cui puù trovarsi 
l 'array da ordinare; anche se gli ulti- 
mi due casi capitano raramenle, gli 
ordini di grandezza restano signifi- 
cativi, 

I n umori rappresentano il tempo 
necessario. In secondi, per l'ordina- 
ménto di array, nel l'ordine, di 256, 
512 e 1024 elementi- 

I lampi rilevati si riferiscono ad 
array di numeri (Interi o decimali, 
non vi sono differenze di rilievo), 
tool caso dell’ ordinamento di array 
di stringhe di caratteri, l'esecuzione 
media peggiora leggermente (dei 
?Va circa, per stringhe lunghe 10 ca- 


ratteri, come pud capitare facendo 
un elenco di programmi), ma In ogni 
caso non arriverà mar ai livelli di un 
programma ricevuto che, per ordi- 
nare 260 nomi, impiegava ben 25 
minuti £1500 secondi - confrontale 
con i tempi riportati nella tabella!). 

Come si può vedere. QUICKSORT 
è veramente Imbattibile (oltre che. ~ 
corio da battere!!!) 

Per guanto riguarda la scelta del- 
la chiave, esistono altri metodi più 
convenienti, che tratteremo even- 
tualmente in seguito, parlando del 
Pascal, quando mostreremo anche 
come può essere facile tradurre 
programmi da quasi 'ultimo linguag- 
gio al basic, coma è stato fatto in 
queslo caso. 

Riguardo al listati, il primo con- 
tiene l'algoritmo di ordinamento di 
stringhe lunghe 16 caratteri, li se- 
condo ordina numeri. Entrambi con- 
tengono, a titolo di esempio, ufi ge- 
neratore di dati casuali che predi- 
spone un array "-disordinalo"; sem- 
pre nel listato si trovano le Istruzio- 
ni per l’uso con serie di dati ottenu- 
ta da altri programmi. 
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EEROM; fra gli appassionali di 
computer, quasi tutti hanno già 
sentito questa parola, alcuni sanno 
che si tratta di un particolare tipo di 
m ormorta, ma non motti hanno 
un’idea abbastanza prati sa di cosa 
sono e di come si usano questi 
componenti. 

Poiché questo integralo è mollo 
utile nel campo dell'Informatica, 
credo che soprattutto chi usa II lin- 
guaggio macchina troverà sicura- 
mente interessante saperne di più. 
e Imparare a programmarlo con il 
proprio computer. 

Non è mia intenzione esporrà Su 
queste pagine un trattato completo 
sulle EPROM (lo spazio necessario 
sarebbe troppo): cercherò di spiega- 
re, nel miglior modo possibile, che 
cosa sono e come si usano le 
ÈPFLpM, passando attraverso altri 
tipi di memoria e aiutandomi con di- 
segni ricavati dal manuali tecnici, 
per arrivare alla fine a presentarvi \l 
progetto completo di un program- 
matore di EPROM 2516 e 2532, adat- 
to ed essere usalo con lo Spoctrum. 

Credo che, per spiegare che cosa 
à una EPROM, la cosa migliore sla 
quella di partire de un componente 
che tutti conosciamo: la ROM. 

Ogni computer, per poier funzio- 
nare. deve avere un programma in 
memoria, che al momento dall'ac- 
censione «dica» alla CPU che cosa 



Teoria e pratica 
della eprom 

di Sergio Cartìglia 

La prima parte di una trattazione 
che si concluderà con il progetto 
completo di un programmatore 


farà: come gestirà la tastiera, Inizia- 
lizzare le porta -dì Ingresso/uscila, 
interpretare le istruzioni BASIC, etc. 
Nello Spectrum questo programma 
si trova nella ROM. 

Questo software non sì deve can- 
celiare neppure spegnendo il com- 
puter (non è così in tulli I modelli: 
per esempio nello Sharp non è resi- 
dente,. ma sì carica In RAM da na- 
stro magnetico). 

Una ROM [Read Onìy Memory}, è 
un tipo di memoria nella quale ven- 
gono immagazzinati I dati voluti du- 
rante la lavorazione del chip, e ncn 
è programmabile da Putente 

é possibile concentrare grandi 
quantità di memoria in un unico 
chip: net nostro Spectrum, sono me- 
morizzati 16 KBytes di dati (compra 
so il generatore di caralterl'l ma so- 
no disponibili ROM con capacità 
molto superiori. Nella fig. 1 à rap- 
presentata una ROM come quella 
dello Spectrum. 

Si possono osservare 14 piedini, 
contrassegnati con AD-A13: questi 
sono gli indirizzi. 

L'esemplo dei cassetti é abba- 
stanza trito, ma calza Pene: $ ogni 
possibile combinazione di «O» e di 
“d u sui piedini di indirizzo (sono in 
lutto 2' 1*4 = 16384 possibili combi- 
nazioni), corrisponde un cassetto, 
che contiene un dato o un'istruzio- 
ne. 


Per prelevare questo dato 0 istru- 
zione e presentarlo all'esterno, at- 
traverso i piedìm_[»Q7 f occorre 
che agli Ingressi OE e CS vi sla una 
certa condizione logica, e precisa- 
mente: *tn su GEO e OE1: su 
li trauma sopra le sigla significa 
che questi piedini sono aitivi a «Do; 
Infatti, gir OE (Output Enabìe) man- 
dano in ttrree state ì buffer di uscita 
con un Uvei lo basso di tensione, e ii 
CS (Chip Setect) trasferisce il dato 
dal cassetto al buffer di uscita, con 
uno D al suo ingresso. 

Se la condizioni agli ingressi di 
controllo non è quella prevista, sì 
possono avere i dati disponibili ai 
buffer, ma non all'esterno, o la man- 
cata selezione dei chip, che non 
aprirà II cassetto. 

Con la giusta combinazione di 
*0» a di ni» sui piedini di controllo, i 
dati vengono trasferiti ali' e scemo e 
sono disponibili per i' utilizzo; nes 
nostro caso, par la CPU ZBOA, ma 
nulla vieta altri impièghi, per esem- 
pio come generatore di ritmi, Suoi 
psichedeliche, o in generale l’ac- 
censione e lo spegnimento di appa- 
recchiature elettriche (ovviamente 
per impieghi particolari occorra 
un'interfaccia adeguala). 

La CPU legga il daio e provvede a 
interpretarlo ed eseguire le opera- 
zioni necessarie. 

In ogni caso non è mai possibile 
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scrivere all'Interno della ROM. 

La RAM (Rendotn Access Memo- 
ry,) è un altro componente indispen- 
sabile in un computer; ricordo che-, 
oltre ai programmi BASIC, coni lene 
lo s/actf, indispensabile anche in 
applicazioni che non prevedono un 
programma in RAM; intatti io Stàcfc 
{lei teral mente catasta) è quello che 
permette, dopo un salto ad un su- 
turami ne, il rliorno al punto Imme- 
diatamente successivo a quello da 
cui è stata lanciata. 

lo sfac* funziona In modo Lesi 
in-Frrst Out; cioè l'ultimo dato me- 
morizzato è il prlfno ad essere ri- 
chiamato, e ogni volta che si ese- 
gue una subroutine, viene messo 
sulla catasta l'indirizzo dì partenze, 
per essere prelevato quando si in- 
contra Il return. 

Durante l'esecuzione di un pro- 
gramma basic, ogni istruzione im- 
plica alcuni passaggi per lo stec*: 
infatti, fa CPU 1 non capisoe il basic, 
ma solo il linguaggio macchina; per 
eseguire PRtNT AT.,., fa CPU esami- 
na l'Istruzione PAINT, salta a una 
particolare subroutine deità ROM, 
che posiziona un puntatore che in- 
dirizza lo schermo, ritorna a esami- 
nare l'istruzione AI, salta a un’atlra 
subroutine, che predispone un pum 
latore verso la mappa video, ritorna 
ancora per esaminare il carattere 
da stampare, e cosi via; tutto ciò 
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senza contee che motto sposso le 
stessa subroutine ne richiamano al 
tre, 

Ma la RAM, oltre allo stacfi e al 
programma basic, contiene anche 
tutte le variabili di sistema, di dui 
S.C. ha scritto di ffu samante in nu- 
meri precedenti, indirizzi genìa i 
quali non sarebbe possibile gestire 
nessuna periferica o anche il solo 
video. 

Nella fig, 2 vi sono I disegni di al- 
cuni tipi di RAM: le 4116 e 4532 so- 
no quelle montate normalmente 
sullo Spectrum si tratta di RAM det- 
te dinamiche: possiamo Immagina- 
re ogni singola cella di memoria co- 
me un condensatore, che quando e 
carico determina un livello logico 
*1*, quando è scarico, uno 

Occorre perciò rinfrescare la me- 
moria un certo numero di volte al 
secondo, precisamente 12fl. 

Nonostante il basso numero di 
piedini, le RAM dinamiche (DfìAM) 
hanno capaci là di memoria notevo- 
li: Je 41 16 possono indirizzare 1$3£4 
bit, le fl£32 ne possono Indirizzare 
3276B, e vi possono essere capacità 
anche superiori. 

Dato il piccolo numero di piedini 
per gli indirizzi, per ottenere tali ca- 
pacità l'organizzazione dei bit all'In- 
terno dei chip è una matrice su ri- 
ghe e colonne, e gli Indirizzi vengo- 
no multipiexati, presentando sul 


piedini prima la pane bassa del l'in- 
dirizzo stesso, insieme ai segnale di 
RAS (ROw Attere . ss SefecfJ, che vie- 
ne butterato al l’interno del chip, e 
Successivamente la parte alta, in- 
sieme ai segnale di CAS (Coiumn 
Address Setect); anche questa par- 
te dell'indirizzo viene butterata', una 
decodi fica provvede poi a selezio- 
nare nella matrice la cella di memo- 
ri a interessata. 

Oon II piedino WE fW rim Enabl*) 
si seleziona la lettura o la scrittura 
In quella cella di memoria. 

Dal momento che si dispone di 
un scio pin per l'input e l'output, oc- 
corre u$are 3 chip per avere Le me- 


moria organizzata in bytes ma, no- 
nostante Il numero di componenti, 
le dimensioni restano abbastanza 
contenute. 

L’unico inconveniente delle 
DRAM è che richiedono una circui- 
tene più complicata. 

be RAM statiche non offrono pre- 
stazioni altrettanto elevate, ma so- 
no molto più facili da usare: non- ri- 
chiedono il rinfresco e non hanno 
bisogno di avere gli indirizzi multi- 
plex&tl. 

Le 21 14 sono organizzate in 1 K x 
4 bit, ne occorrono quindi 2 per tare 
1KByte, le 4016 o le 6116 hanno 
un’organizzazione di 2 K x 6 hit, pe- 
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mano poco e occupano m*™ spa- 
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po, questi componenti hanno un 
prezzo abbastanza allo. 

Veniamo ora alle PROM (Pro- 

27128 

modo 

pio 

CE 

20 

06 

22 

1 

PGM 

27 

VPP 

1 

dell 

gramrvsbfe Read Only Memtxyi; ce- 
rne pica il noma, questo II pò di me- 
moria £ molto simile alia ROM. parò 

In più cè (a possibilità pi memoriz- 
zare «irfntemo del chip dei Pali che 

tortura 


OV 

OV 


SV 

sv 

sul 

programm 


ov 

X 


OV 

+ 21 


HìItHEKmff 


Sv 

X 


X 

SV 

Ngh z 

non andranno persi a meno che non 
lo ai voglia. 

DI questa (amigli a (anno perle le 
PROM propri ameni e dette, le EE- 
PRQM (£t*clrie*lly Erasabi* 
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Le PROM, Sul chip, hanno una 
matrice a fusibili, con una tecnica 
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manuale Texas). 
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che per decidere se la memoria deb- 
ba essere cancellala o scruta, a se- 
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piedino PGM vigne portelo a *0*. 
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mollo facile da usare, ma anche 


piuttosto costoso; nella llg. 4, fi di- 
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EJnc dei fenomeni più interessanti osser- 
vatoli nel mando d&ila mtere-informatica é 
rappresamelo dai criteri $ classlticaziojte 
dei computer nelle cacane homi e perso- 
nal. 

I fatlori cne lina ad ora hanno indotto que- 
sta differenziazione sano due. In primo lun- 
go !a sfragrende maggioranza del pubblico 
peflsa. ohe un computer, il cui Involucro 
esterno sia sdamante una tastiera, appar- 
tenga aimondo degli tiome, e che per assur- 
tene al rànpo d : personal debba essere co- 
stituite da un biacco di più unita didime: ta- 
stiera, unità centrale, monitor, floppy, tic. 

Esiste poi anche una convinzione di ordi- 
ne economia! , por cu* un personal / busi- 
ness computer ed ti relativo software devano 
costare 'al di sopra di una certa etite" per 
essere considerali professionali, 

C'è, invece, una sere di molivi ben dell’ 
nibi-!i, ma più rammento odati, grazie ai gua- 
II la classifica tome, attribuita alle "rasate- 
re" oggi presenti sui mercato, è ts prò cor- 
retta. 

Anzitutto il software esistente, aalia la- 
scia di computer penaraimente idontiricata 
come brune, costituisce ri primo sema osta- 
colo a una promozione degli tarne stessi (g 
meglio dei computer classificati teme tali) a 
personal. 

infatti, te applicazioni protossidi ia i svi- 
luppate ,n inala per la lascia degli lome 
computer tentano di imitare la logica e la fi- 
losofia riscontrabili ;n programmi disponìbili 
su computer pi clss&é superiore generando 
una i n finità di pacchetti gestionali, (magaz- 
zino. contabilità, tic.). 

Gir hcene cercano in questo moda una evo- 
luzione, competendo can i veri personal su 
di un terrene , quello appunto dssMcamEnie 
gestionale, per essi improMnifitle. 

Mancano invece girasi tcraimon-te applica- 
zionr originali, realizzale per soddisfare il 
mercati; business a cui potrebbe rtvtogersi 
un nome computer molto più proficuamente 
dr quanto possa fare ibi personal, grazio al 
favorevole rappacio c-osto/preslarioni, 

Mi riferisca alte diversa categorie di pro- 
fessionisti, per cui ti più efficace aiuta che 
uh computer può fdmre riguarda attività 
connesse can la professione, e non certo 
con contabilità o gestione di magazzma. 

Nei campo delltoffice automatìo#, i com- 
puter classificati come Dome ito testiere), 
non sona, nonostante il basso cesta, mai 
siati presi in seria cor siderazione per due 
molivi: li mirale poìsibiiità di espansione 
deirhardwara e ditti etite di comunicazione 
con mainframe 

In più, non esiste software di livelto .prò- 
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fissionale, et» riunisca per esempio un 
word-pTK:9ss#r . un database uno spread- 
sheet un pacchetto di grafica gestionale, 
cioè i d c essici pacchetti per il compriti 
"da ufficio" 

vorrei ora cercare di spiegare perchè i, 
Sinclair QL pui essere la prima "tastiera" 
identificate e riconosciute come personal 
computer, nonostante il basso costo, 
la potenza innovativa detThardwàre (un 
processore Motorola $8008. in grado ai la- 
vorare m (nuJtitaeliing!i consente di realizza- 
re e seguire una nuova I tóstttfe di sviluppo 
ci software de parie cella Sinc'ar Ita io, le 
cui linee -generali sono (uso i: verbi’ al i?ra- 
sente. perette stiamo già realizzando un di- 
screto numero di applicazioni m quostg sen- 
so): 

• . Assonare alia priorità alte realizzazjo- 
ne di applicazioni nuove ed originali, sfrut- 
tando la grafica, la capacità <B lavorare ir 
muMaskinfj, la possibilità di disporre ds più 
rìntstre, generando un interazione 
computer-utente delle più sofisticate ed 
avanzate, indirizzate espressamente alle di- 
verse categorie d professionisti carne aiuto 
in attività cor seme te la loro pcofessione. 

2. Realizzare applicazioni cne astiano, 
Qualunque sia il loro campo di interesse, ca- 
ratteristiche comuni: 

- stessi comandi 


- «lessa imputazione grafica del videa 

- stesso -velie di documentazione 

- stessii tratteti di ffJe in programmi n- 
vtili atta medesima Pascla di utenza. 

Tutta questo mora sete nett 'ambilo ilaliano, 
ma a livello eurepeo. pe T permettere 
all'utente di sfruttar# anche il software rea- 
lizzata in altri paesi 

3. Sfruttare al neg: iG le capacità di tomu- 
nicoziane de! GL in agni settore, in partico- 
lare nei onice automatico 
. i Dimostrare rame ì 4 programmi torniti 
con il computer (werù-processor, diabase, 
spreadsheet, pratica gestionale) abbiano un 
contenuto Bslrstramnte praiesstonste, sia- 
no compieiamente integrati, usino to stesso 
insieme di comandi 

5. Garantire le espansioni hardware, rea- 
lizzabili urazie àlla pntenza del precessore, 
in modo che l'utenza professionale più esi- 
gente e quella di office autom^tion siano 
certe di nan esser# limitate da alcun vincalo 
Il quest# proposito, esiste già un hard-disk 
da 10M oytes di cui stlam# comptetando un 
test bela). 

ri Dare la possibilità a tutti i possessori di 
un Gi. d? assodarsi al QLU& . un club gestito 
direttamente dalla Sinclair Italia, per oltane- 
re sofuztoni prefesstonali alle domande a 
àgti focosi venienti riscwlrati durante V utiliz- 
zo di una gualcasi delle applicazioni. 
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Istruzioni 
fondamentali 
dello Z60 


Programmazione 
in assembly 
con lo Spectrum 

a cura di Gianluca Carri 


Possiamo dividere le Istru- 
zioni accettate darlo 280 nei se- 
queliti gruppi: 
t. Movi me rito dati 

2. Operazioni aritmetiche 

3. Operazioni logiche 

4. Manipolazione di bit 

5- Operazioni di shiftfrotate 

6. Controllo del programma 

7. Controllo del sistema 

In questa puntata esaminere- 
mo le Istruzioni fondamentali 
appartenenti ai primi due grup- 
pi. 

L’Istruzione 
LD (LOAD) 

Le istruzioni appartenenti al pri- 
mo gruppo (Movimento dati) so- 
no le seguenti: 

LD. PUSH, POP. EX, E XX, 

LDI, LDIR, LDD, LDOR 

L'Istruzione LD è. come già 
abbiamo visto nelle precedenti 
puntate, la più potante. Permet- 
te di muovere dati in molti modi 
diversi, usando tutti \ modi di in- 
dirizzamento, a eccezione di 
quello inerente e di quello 
Stac Is- 
pessiamo esemplificare la 
funzione svolta da LD come se- 
gue: 

LD sorgente, destinazione 
- sorgente - destinazione 
Ovvero, Il dato specificato da 
sorgente è copiato In destina- 
zinne. Sorgente □ destinazione 
devono essere racchiusi tra pa- 
rentesi se il modo di indirizza- 
mento è diretto, indiretto o Indi- 
cizzato. Le possibili varianti di 
LD nei vari modi di indirizza- 
mento sono elen cate di seguito. 

1. Register addressing: 


LD r,r, LDà,I; LD A,R; LD l,A; 
LD R,A; LDSP, HL; LDSP. IX; LD 
SP, IY; 

2. immediate addressing; 

LD r,n; LD dd,nn; LD IX, nn; LD 
LV, nn; 

3. Direct addressing; 

LD A, (nn); LO {nn), A; LD HL. 
{nn); LD dd, (nn); LD JX, (nn); LD 
IY, (nn); LD (m), HL; LD (nn), dd; 
LD {nn}, IX; LD (nn), IY 

4. tndireot addressing; 

LD r ; (HL); LO (HL), g LD (HL), 
n; LD A, (BC); LD A, (DE); LD 
(BC), A; LD (DE), A 

5. Indexed addressing : 

LD r, (IX +d); LO r, (IY + dJ; LD 
flX+dJ, r, LD (IY + d) r; LD 
(IX+dA n; LD (IY+d;, n; 

Le abbreviazioni usate: 

nn indica un indirizzo, oppure 
un numero a 16 bit. 

r indica un registro 

d indica un offset don segno, 
ovvero un byte di cui tutti I pos- 
sibili valori da 255 a 128 song 
considerai) numeri negativi da 
■1 a -128 

dd indica una delie coppie di 
registri BC, DE, HL. SP. 

Nessuna istruzione LO (ec- 
cetto le speciali LD A,l e LD A,R) 


modifica I fiag. Ricordate che 
una sequenza come la seguen- 
te; 

LD A,0 A = 0„ flag immut, 
JR Z, PLUTOfiay zero =■ ? 

Ha un effetto Imprevedibile, 
in quanto il flag Zero non è stato 
influenzato da LD. Dovreste ift- 
ierporre un'istruzione aritmeti- 
ca fra LD e JR, come CP Q, con 
io scopo di sellare correttamen- 
te i flags. 

Istruzioni PIISH e POP 


Come già visto nella puntata 
dedicata allo stack, PUSH salva 
nello stack la coppia di registri 
specificata, mentre POP prele- 
va dai lo stack una coppia di by- 
tes e li memorizza nella coppia 
di registri specificata. 

Le varianti di PUSH e POP so- 
no 

PUSH gq; PUSH IX; PUSH IY: 
POP qq; POP IX; POP IY 

{qq indica una delle seguenti 
coppie di registri; AF. BC, DE, 
HL). 

Nessuna di queste istruzioni 
ha effetto sui flags. 
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istruzioni EX e EXX 
(exchartge) 

Vi sono É istruzioni EX: EX 
DE, HL; EX AF, AF\ EXX; EX 
(SP), HL: 

EX (SP), IX; EX (SP), IV, 
L'Istruzione EX scambia seri' 
pii cernente i due operandi. 
Quindi EX DE, HI scambierà i 
contenuti delia Coppia DE con 
quelli della coppia HL f mentre 
EX (SP), HL scambierà II dato 
sulla cima dello stack (l'ultimo 
dato memorizzato con PUSH) 
con il contenute della coppia 
HL. 

Un caso a parte è costituito 
dalle istruzioni EXX e EX AF, 
AF 1 che, come spiegato nella 
puntata precedente, permetto- 
no dii scambiare ì valori dei due 
banchi di registri disponibili. 

Nessuna di queste istruzioni 
ha effetto sui flags, 

Per quanto riguarda le istru- 
zioni speciali IDI; LDD: LDIR e 
LDDR, rimandiamo a SC n. 06. 

OPERAZIONI 

ARITMETICHE 

Questo gruppo comprende la 
seguenti istruzioni: 

ADD; ADC; SUB; SBC; CP; 
DAA; NEG; INC:. DEC; CCF:. 
SCF. 

Di seguito song usate le se- 
guenti abbreviazioni 
r; registro (A,S,C k D s E 11 H,L) 
n: byte 

d: offset con segno 
rr: può essere uno di questi: 
BC, DE, HL, SP 
Ricordate che tutte le istru- 
zioni che seguono, a eccezione 
delle ultime quattro (INC, DEC, 
CCF e SGF), hanno come primo 
operando l'accumulatore, e che 
il risultato dell'operazione viene 
memorizzato nell'accumulatore 
(a eccezione delle istruzioni con 
dati a 16 bit, che usano HL al 
posto dell'accumulatore). 


Es: l'Istruzione SUB 50 signifi- 
ca: 

LET A = A-S0 

oppure ADD A,H significa: 

LET A = A + H 

Non esistono istruzioni con 
primo operando diverso da A 
(ovvero, non sono disponibili 
istruzioni come ADD L,B o slmi- 
li). 

Addizione 
e sottrazione 
(ADD, ADC, SUB, SBC) 

Vi sono due tipi di addizione e 
due tipi di sottrazione: normale 
(ADD, SUB) e con riporlo (ADC, 
SBC), Un esempio di addizione 
e sottrazione normale è lì se- 
guente: 

ADO A,2Q (LET/A-A+20) 

SUB Q (LET A s A-C) 

Notate come l'istruzione SUB 
necessiti solo del secondo ope- 
rando (ovvero solo SUB C inve- 
ce di SUB A,C); questo poiché 
tutte le istruzioni SUB hanno co- 
me primo operando il registro A 
e non importa quindi specificar- 
lo. 

L'istruzione ADC somma ai 
due operandi il valore del flag 
CARRY (riporto), che può essere 
Q o 1. Il risultato di una istruzio- 
ne come ADC A, IO può quindi 
essere A+ 10 o A+ 10+ 1, a se- 
conda del valore del flag di ri- 
porto. 

SBC, come è logico, sottrae il 
valore del flag di riporto, quindi 
il risultato di SBC A, 10 può es- 
sere A-10 oppure A-10-1. 

Potreste chiedervi quale sia 
l'utilità delle istruzioni ADC e 
SBC: esse sono fondamentali 
per sommare o sottrarre numeri 
più lunghi di 16 bit, 

El seguente esempio somma 
due numeri a 24 bit usando 
ADC: 

il r numero a 24 bit è conte- 
nuto nei registri B,C,D 


il 2" numero a 24 bit è conte 
nuto nei registri E.H.L 
Il risultato a 24 bit è fornito 
ne» registri B,C,D 

LD, A,D À = D 

ADD A,L A = A+ L 

LD D,A D = A 


LD A,C A = C 

A DC A,H A = A + H + riporto 
LDC.A C = A 


LD A,B A= B 

ADC A, E A = A+ E + riporto 

LDB,A B = A 

RET 

Usando ADC, Il riporto della 
precedente addizione à somma- 
to alla somma del byte succes- 
sivo, in modo da ottenere un ri- 
sultato corretto. 

Quelle che seguono le versio- 
ni di ADD, ADC, SUB, SBC nei 
vari modi di indirizzamento: 

1 . Hegister addressing: 

ADD A.ry ADC A,r;SUB r r, SBC 

Kr, ADD HL lff; ADC HL ,rr; SBC 
HL/r; ADD IX, BC; ADD IX, DE; 
ADD IX, IX; ADD IX, SP; ADD IY. 
BC; ADD IY, DE: ADD |Y, IY; ADD 
IY, SP; 

2. immediate addressing: 
ADD k,n; ADC A ,n; SUB n; 

SBC A.o; 

3 . inditeci addressing: 

ADD A, (HL); ADC A, (HL); 
SUB (HL); SBC A, (HL); 

4. indexed addressing: 

ADD A, (IX + d); ADD A, 

(lY + tfl; ADC A, (IX + d); ADC A, 
(IY + d'i; SUB (IX + d); SUB 
(IY + dì; SBC A, (IX + dJ r - SBC A, 
(IY + db 

Si noti la mancanza di 
un istruzione SUB HL, rr. per si- 
mularla sarà necessario usare 
SBC HL, rr, previa cancellazione 
del riporto tramite OR A; SOF e 
CCF, oppure ANO A. 


(sbìjjs a pag. Kl 
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Dopo aver parlalo di vocaboli, 
frappo e tecniche per potar affralì' 
tara un adventure. cerchiamo ora di 
mattare in pratica quanto imparato, 
risolvendone uno insieme 

U scelta è cadute au Arrow of 
deelh, scólte da Brian Howart per 
la strie Mystenous adv9rrfLrre r pre- 
dati a delle Digital Fantasia (ora 
questa casa di software è stata rila- 
vata dalla Channol 6|. 

Altri adventurés. sicurametilè più 
limosi, con» Tht HoàW Q Sher- 
(ock. usano struttura a linguaggi 
particolari raramente presenti in 
questo genere di giachi, 
inoltre, Arrow ot dsfrf/i è un sd- 
venture commerci al maio In due 
parti (Part onefPart two'l e le lun- 
ghezza p anche. almeno in guasto 
caso, sinonimo di un maggiore nu- 
mero di enigmi da rtaotvw e. 

La parole in lingua inglese sono 
state ridotte al minimo Indispensa- 
bile, per cercare di rendere più scor- 
revole un lesto che pud risultare, 
per le situazioni che deve descrive- 
re, spesso ripetitivo naif utilizzo del 
ver pi. 

Ho preferito inoltra rimandare al- 
la fina della risoluzione ogni com- 
piente sulle tecniche e gli accorgi- 
menti usati per poter correli amante 
risolvere questo affascinante duel- 
lo con il computar. 

1 numeri che si Incontrano nella 
letture non hanno nessun riscontro 
tul video: servono par facilitare la 
lati ure delle mappa che trovata ri- 
prodotta in queste pagine, 
Ricordate Infine che digitando 
INVENTORY potrei e sapere, in 
qualsiasi momento, guati oggetti 
state portando con voi 
Dopo aver caricalo li programma, 
il computer chiederà se vogliamo 
caricare una situazione precedente- 
mente salvata. Per ora rispondiamo 
no (per salvare la situazione mo- 
mentanea, dovete digitare SA VE), 
La grafica,, come potete apprez- 
zare dal l 'esempio che pubblichi ar- 
mo, è decisamente buona, premevi, 
do il solo tasto ENTER, ai disegmo 
Si sostituirà la descrizione dei luo- 
go. 
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La freccia della morte 

Afra* o t dea iti {Pati ona). Inizia 
nel cortile di un palazzo (1|. Trovia- 
mo subito un messaggero morto. 
Esaminandolo texani ina massen- 
gar) gii troveremo Indosso un amu- 
leto Prendiamolo /gel emu/eto esa- 
minando anche questo, notiamo 
che vi è incisa la figura di un bar- 
caiolo. Esaminiamo ora il cortile 
(ex amine courlyard) e i reclamo una 
utile corda fropa}. Raccogliamo diti- 
gentemente dirigendoci poi ad 
ovest (w), ed entriamo nel palazzo 

m 

Continuando ad ovest twk d tro- 
viamo nella stanza del re l3). Qui c'è 
un letto (brtfc un'armatura fàiimciiJ'i'J 
e uno stemma (coat), 

Prendiamo l 'armature, ig&t ar 
jnotrr.1 ed esaminiamo II letto. Sul 
gusle ci viene rivelata le presenza 
[abbastanza owla) di un cuscino 
flp/Kpwf. 

Come aJ solito, lo prendiamo con 
noi e, esaminandolo, sentiamo che 
ai suo Interno vi è qualcosa. 

GII a questo punto, vi sarete rèsi 
conto Ohe è Indispensàbile esami- 
nare con attenzione tutti gli oggetti 
che w incontrano durante i adventu- 
r* Ovviamente trascuro di tìescnve- 
i« quelli che, esanimali, non rappre- 
sentano o contengono alcun indizio 
utile. 


Esaminando lo stemma, scopria- 
mo che puè essere girato, Ripetia- 
mo l'operazione per tre volte rfura 
coat}, e di fronte a noi si apre un 
passaggio. Par percorrerlo dobbia- 
mo digitare go passaga 

Ci troviamo ore in una cantina W. 
dova rinveniamo una speda (sworaj 
Raccogliamo anche questa e usia- 
mola per tagliere ii cuscino feuf p/J- 
ipw). De questo cadrà un borsellino. 
Lasciamo li cuscino {drop plliow) e 
prendiamo l'oggetto appena sco- 
perto {gai purse't Che cosa lare dì 
un borsellino? Ovvio, guardiamoci 
dentro vi troveremo uni moneta 
(som;. Lasciamo I N borsellino, or- 
mai inutile, e raccogliamo la mone- 
te. 

Torniamo si luogo numero {2 } e 
da qui a sud fsj. 

Ci troviamo nella stanza del trono 
(5J. Al Unzione: non esaminate nè 




Adventures/IV 

Arrow 
of death 

di Giuliano Boschi 

Una mossa per volta, 
vi guidiamo alla ricerca 
della “Freccia della Morte " 


guardale la bacchetta d'oro (golden 
fratoni, o morirete all’istante. Esa- 
miniamo invece Zardra 11 mago. Or- 
mai morente et dirà: 

*La treccia magica distruggerà 
Xerdon» 

in queste situazioni occorre lavo- 
rare un po' d'intuito: il nostro scopo 
ora à quello di trovare la traccia ca- 
pace di eliminare il malvagie Xer- 
don. 

Dirigiamoci a est (e), a sbuchia- 
mo nella cucina del palai» ($}, Esa- 
miniamola (mtamtiie kitc freni, e ci 
viene suggerito un ganero metallico 
(hook}, Stiamo però portando già 
troppi oggetti a, per poter raccoglie- 
re il gancio, lasciamo, momanta- 
n damante, l'amuleto (drop amuiet 
■gel hook}. Torni amo nei luogo (1) e 
andiamo verso nord (n). 

Siamo al centro di un incrocio (7) 
e vediamo un vecchio mendicante. 


Offriamogli la moneta (otfer coin). 
Come ricompensa per la nostra ge- 
nerosità, ci lascia una sfera di cri’ 
stallo (otb} e un foglio di appunti 
fjToJeJ, quindi scomparirà misterio- 
samente, Prendiamo il foglio (gel 
note) e leggiamo (read note): 

«Quando tutto sembrerà 
perduto... aspettate*. 

Per il momento incompronstbire, 
l'indizio si dimostrerà utilissimo: la- 
sciamo il foglio e prendiamo la sfe- 
ra di vetro (gel orto). Dirigiamoci a 
nord (ny. imbocchiamo una strada di 
montagne (8). Da qui andiamo verso 
ovest ffcvj, fino al piedi di una ripida 
salita (Sii. 

Individu i amo la presenza di uno 
Stretto sentiero, proviamo e percor- 
rerlo (go ledgeh me qualcosa di pe- 
same ci farà mancare il terreno sot- 
to ai piedi facendoci franare di nuo- 
vo a valle. La colpa è ovviamente 


dell 'armatura ma, vi posso anticipa- 
re, è indispensabile riuscire a por- 
tarla con noi. 

Dobbiamo ricordarci del gancio e 
della corda che abbiamo raccolto in 
precedenza. 

Leghiamo ie corda al gancio (ite 
rope) e quindi agganciamo l’arma- 
tura (hook armoni). Raccogli amo di 
nuovo la corda e andiamo vereo il 
sentiero (go lodge). 

Ora ci troviamo sul dirupo, tiria- 
mo la corda (pitti ro pe) e riavremo 
così la nostra armatura. Prendiamo- 
la (ge-f atmourl e, a questo punto, 
dobbiamo anche Indossarla fwear 
armoni). Lasciamo la corda (drop 
rotte). 

Come se si trattasse delia lampa- 
da di Aladino, strofiniamo la palla 
di vetro (ruborby scaturirà una luce, 
che ci permetterà di notare l'entrata 
di una caverna. Entriamo (go cave) 
(11) e strofiniamo dE nuovo la sfera 
(rub orb)r. un serpente gigantesco ci 
sbarra la strada. 

Niente paura, abbiamo indossato 
l'armatura, non ricordate? Per ucci- 
derlo, dobbiamo digitare per tre vol- 
te kilt serpent witfr s word 

Ora possiamo raccogliere la pun- 
ta della freccia che si trova nella ca- 
verna e che II serpente difendeva 
(gel arrowhe ad). 

Abbiamo trovato una prima parte 
della freccia magica, ed è chiaro 
che dobbiamo compietarta, prima 
di po'er ai imi nere l'odiato Xerdon. 

Torniamo nella stanza (fi), dova 
abbiamo lasciato l'amuleto, è recu- 
periamolo (a-d-e-ee-e^Lv-s-ej, Andia- 
mo ora nel luogo (7) (Wai-e-4 e da 
qui ad est (e). 

Siamo capitati in urta foresta (14) 
e, come ci è st ato suggerito, aspet- 
tiamo (W a/t). DI colpo veniamo tra- 
sportali ai piedi dì una rupe (15), Am 
diamo a nord- (n), e scopriamo un la- 
go (i6). dotato di regolare barca e 
altrettanto regolare barcaiolo, 

L'immagine di un barcaiolo si tro- 
vava sul l'amuleto (coma vedete, 
non ci si può permei tere la dimenti- 
canza di nessun dettaglio); mostre- 
remo perciò al battelliere l'amuleto. 

Possiamo cosi essere accolti nei- 
la barca (17). Aspettiamo di nuovo 
(watt) e dopo poco verremo sbarcali 
nei pressi di una pozza ormai secca 
■;ibì. Unica via sud (s) (19), e da qui 
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Lo schema <W funghi di 
" Arrow of deattt”. 

I numeri non hanno riscontro 
sul video r ma vi faciliteranno fa 
lettura dei testo. 


20 - Sinclair Cernuto 


rsjguaacag.frl) 


andiamo a est (e) (20). 

Arriviamo davanti a uno schiavo 
In catana, che (occorre dirlo?) dob- 
biamo cercar di liberare. Avendo (a 
spada, tagliamo io catone (puf 
chain). 

La schiavo d seguirà e, come ve* 
dromo, ci sarà di grande aiuto. 

Andiamo a sud (s), attraversiamo 
un’enorme cucina, continuiamo a 
sud (22), quindi saliamo (up) (23), 
Notiamo subito la preserva di un 
pesantissimo macigno, 

Proviamo a muoverlo (move boo- 
ti fer) e, riconoscente per essere sta- 
to liberalo, lo schiavo ci aiuterà. 
Spostato II masso, viene alla luce 
l'ingresso di una nuova caverna. 

Entriamo con go cave (£4). È buio 
si ratiniamo di nuovo la sfera (rad 
orto), e troviamo una pergamena 
(scroii). Raccogliamo a leggiamo 
(reati soroill 


«Trova la piuma della potente 
aquila». 

È ia seconda parte della nostra 
freccia. Lasciamo (drop) pergami 
na e sfera e torniamo al luogo 22 
(n-tih quindi ad ovest (w) (25). Qui 
troviamo degli appetitosi lunghi, 
ma non fatevi prendere assoluta- 
mente delta tentazione di mangiarti . 
Lo schiavo, che The fatto, è già ca- 
duto profondamente addormentatO- 

Raccogllamoli: 11 useremo per 
drogare il cibo dei giganti che abita- 
no il liiogo, rendendoli cosi Inoffen- 
sivi (get toadstools). 

Torniamo quindi in cucina 
entriamo nei calderone (go 
house ) f£7) e avveleniamo II urutit 
(poison broth). Ritorniamo di nuovo 
In cucina rivi: ora possiamo con si- 
curezza riprendere la direzione 
ovest (w). 

CI troviamo nella casa dei giganti 


(26), ormai lutti addormentali. Con 
go building eni riamo (29) e, oltre ai 
giganti, troviamo una scaia. Usla- 
mola (go ladder) per salire al piano 
superiore (30); qui possiamo vedere 
un tronco. Prendiamolo {get log jl 


Mai disperare 


Continuando verso ovest (w) (31), 
usciamo dalla costruzione e arrivia- 
mo ai bordi di un canale. Utilizzan- 
do Il tronco, passiamo navigarlo (go 
fiume): eccoci cosi a cavalcare una 
primitiva piroga (32)... aspettiamo 
(watt) (33), e con go deaeft raggiun- 
giamo la spiaggia (34), Saliamo fupJL 
Davanti a noi si para un'aquila 
(36). FI nòstro (Irriverente) compito è 
quello di staccargli una piuma 
(piuck eagie). L'aquila slessa, per 
niente offesa (?), ci artiglia e ci tra- 
sporta in una pianura (361 
Andando par 5 volte a nord (n-n-n- 
jt-jU giungiamo nei pressi di una ca- 
panna. Entriamolo hut)(^\ per un 
nuovo drammatico incontro: il cor- 
po senza vita di un nana. Nuova per- 
quisizione {mammà dwarfh e trovia- 
mo cosi un medaglione; prendiamo- 
lo e, con un ei (amine metiaiilon ap- 
puriamo che è d'argento. 

Esaminiamo ora la capanna (ete- 
rnine hut) e rinveniamo un paio di 
occhiali. Prendiamo anche questi 
(get speclade s). 

Usciamo con sud (sj, da qui con 
nord (n), ovest (w) e ancora nord (n). 

Pensavate che i colpi di scena 
fossero finiti? Eccovi tra i resti di un 
villaggio bruciato- Studiamo le rovi- 
ne (examine tiebris). scopriamo una 
botola. 

Digitiamo go trapdoor ed entria- 
mo in una cella (46). C’è una cesta, 
apriamola (open chmt), per trovarvi 
un libro- Non polendo portare più di 
5 oggetti, lasciamo momentanèa- 
ente la spada {drop sword). 
Prendiamo il libro e proviamo a 
leggerlo: è scritto in caratteri trop- 
po piccoli. Indossiamo gli occhi ah 
(we$r speciadas) a riproviamo freso 
hook): 

«Distruggi XerdOn il malvagia con 
la freccia costruita dai sac.ro salice, 
M guardiano del salice è avido d'ar- 
gento», 


L'articolo di queslo mese è tutto 
dedicate alia spiegazione dei pro- 
gramma Music Compiler presenta- 
lo tra I listati, Il quale, mettendo in 
pratica I concetti egressi negli arti- 
coli) procedenti e alcuni che verran- 
no chiariti nei prossimi numeri, per- 
mette di produrre con facilità brani 
musi cali. 

Prima di passate alla descrizione 
dei programma I necessaria una 
brave precisazione: nelle opzioni 
del menù ci sono dei salti, per 
esempio dairppziona 5 si passa ai- 
la 7, le linee del programma presen- 
tano del vuoll, ad esempio dalia li- 
nea 3255 ss salta alia linea 507d- 
Questo perché sono previste alcune 
altre ronfi nes che : per chiarezza 
espositiva e per non sovraccaricare 
questa prima parie, aono state 
emesse; verranno presentate nei 
prossimi articoli, e dovranno essere 
inserita negli spazi lasciati vuoti, 
seguendo le indicazioni otte dare- 
mo. 

Una velia .battuto, il programma 
permette di inserire dati per mezzo 
di una tastiera, di ascoltare il brano 
scritto, di modificarne la velocità 
OOP la funzione metronomo, di ave- 
re una tabella di DATA nel caso si 
voglia, inserire il brano in un altro 
programma; c'è infine ia possibilità 
di memorizzare e ricaricare il brano 
compitato. 

Vediamo le possibilità del menù 
per una. 

Alla richièsta di /nserfmerrfo di 
dati, il computer presenta urta pagi- 
na videe con ia quale vengono ri- 
chieste alcune informazioni sul bra 
no che sta per esser# compilalo. 

Le prime due non necessitano 
commenti, riguardano l'autore ed il 
titoto. 

Laterza richiesta riguarda invece 
la tonai ili del pezzo, ed è fonda- 
mentale, poiché influisce sulla suc- 
cessiva eia cor az io ne di dati, ope- 
rando automati temente sull# note 
Che devono essere alterate. 

Per esempio: se il pazzo che vo- 
gliano Inlrodurre à in SOL maggiore 
Significa che tutti i FA che verranno 
incontrati nel corso dal pezzo do- 
vranno essere considerati come FA 
diesis, anche se davanti alla 'iota 
FA non c'è nessun diesis che fo 
specifica; queslo perchè la tonalità 
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di SOL Maggiore ha il FA diesis in 
chiave (vedi ligurà). 

L'Inserimento delta tonalità netta 
testata di inìzio dal programma fa si 
che il computer provveda ad altera- 
ire tutta l e note necessarie sehZé do- 
ventalo specificare ogni rolla. 

Quindi nell'esempio di prima, il 
pezzo in SOL Maggiore, una volta 
data l'indicazione di tonalità il com- 
puter saprà ohe tutte le volte che In- 
contra un FA, a meno Che non ci sia 
un' Indicazione contraria, questo do- 
vrà essere considerato come un FA 
diesis. 

Per chi ha già conoscenza di teo- 
ria musicale, la cosa non crea nes- 
sun problema, si tratta solo di dare 
[' intorni salone nella giusta forma 
(che vedremo tra poco); gli all ri ab- 
biano un po' di pazienza: il concetto 
di lonal Uà e come questa si trovi sa- 
rà spiegato in uno del prossimi arti- 
coli. 

Per ora I Imitatevi a usare ìa tona- 
lità di DO maggiore, inserendo solo 
le note corrispondenti ai suoni na- 
turali (confrontale per questo l'arti- 
colo uscito nel mese di dicembre). 

La forma corretta per inserire ta 
tonalità è. nome della tonalità e, 
senza lasciare spazi, l'eventuale al- 
terazione (diesis, indicato dal cen- 
eel letto - SYMBOL SH. + “3” - o be- 
molle - "b" minuscola). 

Uno spazio bianco e l'indicazione 
abbreviata di maggiore o minore, 
con il punto per finire. 

Esempio: la tonalità di DO mag- 
giore andrà indicata cosi.' 

DO MAO. 

la tonalità di FA DIESIS MINORE; 

FA 8 MIN. 

la tonalità di SOL BEMOLLE 
MAGGIORE: 

BOLb MAG. 

etc. 

L'altra richiesta riguarda il tempo 
vicino alla chiave, e non è fonda- 
mentale: serve solo per avere un 
controllo durante la digitazione del 
pezzo. 

La fine di ogni battuta viene se- 
gnalata con un BEEP; perciò, se 
seni I amo un beep e l'ultima nota in- 
serita non è Futi Ima nota deità bat- 
tuta, abbiamo dimenticato qualche 
cosa o abbiamo sbagliato qualche 
valore, 

L'ultima richiesta Ci chiede e 


quanta voci è il pezzo. 

Non è che lo Spectrum possa 
eseguire più di una voce per volta, 
ma poiché si prevede dì completare 
questo programma con alcune rou- 
tines per l'analisi, questa informa- 
zione tornerà utile per poter imma- 
gazzinare ad analizzare un pezzo 
musicale compiete; ma di guasto ri- 
parleremo più avariti, 

Per ora inserite "1" e premete 
ENTEH. 

La seconda schermata presenta 
un'ottava di urta tastiera di piano- 
forte, Ih cui ogni tasto è segnato 
con il suo nome. Sulla sinistra c'è 
un promemoria delle operazioni che 
stiamo svolgendo, che viene aggior- 
nalo di volta in volta, in modo da ri- 
cordarci in quale voce stiamo im- 
mettendo dati, quai’ò l'ultima nota 
e l'ultimo valore inserito. 

Sulle destra ci sono le lettere 
dell'alfabeto, da A à G- é alcune ab- 
breviazioni che stanno per: ottava 
ceniate, 1 ottava bassa, 3 ostava al- 
ta, etc, 

Ogni inserimento di note avviene 
con due operazioni di INPUT; con la 
prima determiniamo l'altezza, 
espressa In forma numerica, con la 
seconda la durata dalla nota, 
espressa In forma frazionàrià- 

Abbiamo visto nel numero di di- 
cembre come il computer tratti le 
noie in forma di numeri, positi vi dal 
DO cenlrale in su, negativi dal DO 
centrale Ih gry. 

Inserendo la lettera dell'alfabeto 
corri s por oe lite all'ottava che ci in- 
teressa, possiamo visualizzare su 
ogni tasto il corrispondente nume- 
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rp, evitando cosi di fare calooli per 
trovare il giusto valore di ogni nota. 

Se per esempio premiamo A, su 
ogni tasto verrà scritto un valore nu- 
merico, considerando gli otto tasti 
come ottava centrale di un piano- 
forte: avremo quindi i numeri da 0 a 
12 , 

Se premiamo E avremo i numeri 
dalia seconda ottava, da 12 a 24; e 
cosi via. 

E possibile cambiare ottava in 
qualunque momento, purché la let- 
tera dell'alfabeto corrispondente 
venga Inserita alla richiesta del 
computer: ottava o notà- 

&a vog I lame ann u I lare l’effetto d i 
un alteratone costante, dobbiamo 
far seguire la nota dalla lettera B 
mal osco la (beq uadro) . 

Rifornendo al nostro esemplo Ini- 
ziale: se siamo in tonalità di SOL 
maggiore e un FA, normalmente 
diesis, deve invece essere inserito 
come FA naturale, e supponendo 
ohe sta il FA dell'ottava centrale, 
basterà inserire "5£T, e il FA non 
sarà alteralo. 

Se dobbiamo inserire una pausa, 
sarà sufficiente digitare "P”, segui- 
to dal suo valore (alla richiesta del 
computer). 

Infatti, inserita la nota o là pàusa, 
premendo ENTER II computer ne 
chiederà il valore, che dovrà essere 
inserito informa frazionaria: pense- 
rà poi II calcolatore a trasformare 
questo valore nella durata reale da 
attribuire a x nella funzione BEEP x, 
y. È questo un sistema molto como- 
do che permetta di copiare qualun- 
que spartito musicale, senza dover 
ricorrere a noiosi calcoli. 

Per inserire varori puntati, à ne- 
cessario ridurre il tutto al valore più 

piccolo: per II valore si dovrà in- 
serire la frazione 3i3. Per maggiori 
chiarimenti, rileggiete ta puntata di 
gennaio e riguardatevi il relativo 
programma. 

È possìbile inserire anche le ligu- 
re irregolari, come le terzine, le cin- 
quine. le sèsilne, etc. 

Basterà aggiungere ai valore del- 
la nota la successivi divisione. 

Esemplo; v otando^ produrrg 

bisognerà dare II valore complessi- 
vo della figura (ita) e poi dividerlo 
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per ire, si avrà quindi ''1/4/3" 
Volendo inserire ff f ff 

si fa la stessa cosa: prima II vaiare 
complessivo delia figura (1/4), poi si 
divide per cinque (perché e una tirv- 
qu ina]; quindi: "1/4/5". 

Terminala la digitazione dei bea' 
no musicate, basta battere "S"; se è 
Stala programmata una voce sola, il 
computer (ornerà al menù Iniziale: 
se le veci programmate sono più di 
una, Il computer si disporrà per rice- 
vere I dall relativi alla seconda vo- 
ce. s cosi via Uno ad esaurimento 
delle voci programmato 

Per ascoltare quanto inserito, 
una ratta tornati al menù Iniziato, ri* 
chiedete l'opzione 2 ; dopo aver mo- 
stralo la scheda di presentazione 
del pazzo, il computer passerà a un 
menù secondario 
Per II momento avale a disposi- 
itone le opzioni: 

4 esecuzione 

5 ir asporto 

7 visualizzazione data 
S ri torno al menù 
Se scegliete l'opzione 4, dopo 
avervi chiesto la voce che volete 


ri t^iu- 

Tuffa le no?* segnata con una che ta vicino non c r é nessuna affé- 
ovatti devono essere attirala ari- razione 


sentire (1, se avete memorizzalo 
una sola voce), il computer vi mo- 
strerà una tabella, corri spendente 
alle diveree voci del metronomo, per 
la scélta della velocita del pezzo. La 
voci sano in progressivo ordine, dal- 
le più lenta alia più velo». L'opzio- 
ne 1 1 ; memvKwno permei i e di effet- 
tuare la scelta manualmente 

Potete ripetere l'operazione 
quante volte volete, finché non tro- 
vate la velocita giusta., 

L'opzione 5 consente di traspor- 
tar* un brano in una tonalità più al- 
ta O più bassa, o più semplicemente 
di risentire io stesso patio, suonato 
più alto (più acuto, non più forte) o 
più basso. 

Alla richiesta trasporlo^ insania 
Il numero di semilonl di Cui volete 
trasportare II brano: per seni Ire 11 
pezzo più alto di un tono. Inserite 


+2 (un tono * formato de 2 semito- 
ni) se lo volete semine di un tono più 
basso, inserii# —2, s cosi via. 

L'opzione 7 permaite di visualiz- 
zare I dall del brano, e torna sicura- 
mente comoda se votele Inserirli In 
un auro programma, I dall vengono 
proposti al video come se lossero 
inserii I In una linea di DAT Ah nel se- 
guente ordine: Il primo numero si ri- 
ferisce aita durata in tempo reale. Il 
secondo si l 'a Itezza del I a nota: quin- 
di si ripetono sempre nello stesso 
ordine. 

Potete controllare come cambia- 
no i valóri di durate, provando s mo- 
dificare la velocità di esecuzione. 

L'opzione fi serve por tornare si 
menù principale, dove (con l'opzio- 
ne 3) potete salvare II brano, che 
pud poi essere ricaricato con l*op- 
zione 4. 


Gigantografie 
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Il copy dello schermo su stam- 
pante à una delle opzioni più amate 
degli utenti: con ie stampanti 
Sineiatr-dedicate si usa n funzione 
COPY; con quelle standard, inter- 
facciata attraverso schede tipo B & 
V, esiste le possibilità cu riprodurre 
lo schermo 1:1 (ogni pixel un punto 
delle matrice), o e dimensioni rad- 
doppiate- in queat'ulllmo caso, pe- 
rù, con una stamparne a 80 colonne 
vengono porse le due colonne di 
schermo più a destre. 

Con II breve programma presen- 
tato a- possono produrre copie di 
grandi dimensioni (circa un metro di 


base), sfruttando la funzione 
POI NT. che mi arroga ogni singolo 
pixel dei video e restituisce *1» se è 
inchiostrato, «0* se non lo è, 

L immagine viene suddivisa in tre 
fasce orizzontali, analizzale sapar a- 
l amante, a ogni pixel che risulta 
*tv. Si fa Corrispondere un carattere 
stampabile (qui è siale usala la 
«X»). Ls stampa avviene per colonne 
vediceli di puntini, ma ruotando di 
90 gridi rispetto alla normale dire- 
zione di stampa- 
li risultato saranno 3 strisce, che 
giuntate una all 'altre daranno la fi- 
gura completa- 


Secondo la stampante possedu- 
ta, si poi ranno eseguire modifiche 
al programma per migliorare la defi- 
nizione dell'immagine: aggiusta- 
mento dsinnieriinea. stampa In ne- 
retto. sostituzione del carattere se 
la X non vi soddisfa, eie. 

Il listato pubblicato contiene le 
Istruzioni per pilotare una stampan- 
te Epson con porta seriale fl$232, 
attraverso nnterfaoe 1; chi usa una 
paralleli tipo Centronics deve mo- 
dificare le linee con i comandi di 
stampa. 



Marco Bedani 


RESISTENTI, COMPATTE 
SILENZIOSE, EFFICIENTI, 
AFFIDABILI E COMPETITIVE. 



Stampanti MITSUI con le caratteristiche 


La TELCOM propone una gamma di stampanti 
che si distingue per la varietà 
delle funzioni e per la grande affidabilità: 

- 80 e 132 colonne 

- 120 e 180 caratteri a! secondo bidirezionale ottimizzata 

- fogli singoli, moduli contìnui 

- vari tipi di caratteri 

^ stampa espansa, compressa, NLG, grafica 

- interfaccia parallela, seriale, buffer fino a 128 KB, 
interfaccia speciali. 
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Conto corrente 

<i>»AdA parte - la prima parte 
del listato COHJO CQRR E*T£ •' 
jtata pubblicata sul n.lP, a cui 
rimandiamo anche per zi eoiHRto 
al programmai 


924 LET ink-2+C2 AMD BEN h(v^i 
»i LET «l>(*D M AND i fìk=*2> + ("A" A 
ND i nk“41 t LET tnk2-2-M2 AND SON 
htnW): LET z**-<*D” AND ink2“2 
l+l"A" AND ink2~4> 

926 PRINT b* (vi | TAB 4jv*tv>;TAB 
13; INK ink;aS;TAB FN itMv> f 14 

,0>;b£v>;TAB 23; INK ink;a*;TAB 
FN i Ca t 24,B> ja 

927 PRINT h*(n>;TA6 4;v*(n>|TAB 
I3i INK ink2; z*; TAB FN ilhtn>,i 

4,B>;Mn> 

930 PRINT h*(n>|TAB 4;v*(n»;TAB 
13; INK ink2;i*;TAB FN i<h<n>,l 
4 t 0>;hIn>|TAB 23; INK ink2;z*;TA 
9 FN i (b,24 R S> ;b 
933 LET m*ldo-Ml du+b tfi> 

935 CO TO 691 

950 REM introduzione operazioni 

951 CLS , 

952 IF op-100 THEN PRINT “NUME 
RQ MASSIMO OPERAI IONI EFFET-TUAB 
ILI t!00> SUPERATO. *-i BEEP .5» 20 
i BEEP .5,30; BEEP .5,201 RETURN 

953 CLS * PRINT "INTRODUZIONE □ 
PERAZ IONE N. "jop+1; PRINT AT 21 
,0; M H£LP par i codici,": PRINT A 
T 2,0; "Codice operai ione "i LET 
col ormatisi LET rig*"2; LET con- 
2> GO SUB 40 

954 IF LEN a*>4 OR LEN a#<3 OR 
a*-"" THEN (30 TO 953 

955 GO SUB 9S5i IF a*='lCLP" TH 
EN 00 SUB 99001 GO TO 953 

956 FQR n»l TO 33 

957 IF a*-c*(n) THEN LET ope-^n 
i SO TO 960 

950 NEXT ni 00 SUB 490: GO TO 9 
33 

960 PRINT AT 21 ,0; H 

" i LET op*op 

+ 1 : LET h*(op>=a* 

963 PRINT AT 3,0; “Data operai io 
ne i"j LET riga-4t (30 SUB 5060 
960 SO SUB 50BB 

969 LET f * (op> “#4 

970 SD SUB 50001 LET flopl-gg 



971 IF h*<op>- , 'VAR" OR h#lop>-" 
CHI " THEN SO TO 975 

972 PRINT AT 7, 0| " Inporto" I LET 
riga~7i LET colcnna-B: SO SUB 4 

0i IF a**"" OR **-"0 p THEN GO T 
0 972 

974 LET 1 fn— VAL a* 

975 CLS ; SO TO < epe- li *100+ 100 

0 

905 FQR n-i TO LEN a* 

990 IF a* (n) >"Z" THEN LET a*<n 
1-CHR* (CODE a*tn)-32> 

995 NEXT r. 

998 RETURN 

1005 PRINT "PRELEVAMENTO » 

1010 LET h topi— in 

1015 LET v*<pp>-f*(opJ i LET gtop 

)-f iopì 

1025 OD SUB 5090 

1030 PRINT “Questa operai ione ge 
nera una «torno di interessi 
per m i 

1035 GO SUB 5100 
1040 PRINT int 
1050 GO SUB 5070 
1060 IF op a 0 T>EN RETURN 
1070 IF (scadde AND g topi >921 OR 
(g(opKtCzd) THEN OD SUB 5055 
1080 RETURN 

1105 PRINT -PRELEVAMENTO" 

1110 LET h(op)«-iei PRINT AT 2,0 
t“Data MiHioni assegno 7“t LET 
riga-3i 00 SUB 5060 
1115 SO SU» 5000; LET g<Dpl-gg: 
GO SUB 5000 
1120 LET v*£op>-a* 

1125 CLS : GQ SUB 5090 
1130 PRINT “Questa operai ione ge 
nera uno atorno intere»»! per 
1135 SO SUB 5100 
1140 PRINT int 
1150 BO SUB 5070 
1155 IF op a 0 THEN RETURN 
1160 IF <scad=0 AND g(ópl>92> OR 
IgtapK scadi THEN 00 SUB 5055 
1170 RETURN 

1205 PRINT "SIROC0NTO a favore p 
roprio" 

1206 PRINT AT 1 ,0; “Qper azione a 
credito ?”i LET rigagli LET colo 
nna-24s LET con-2* SO SUB 40: IF 

a*= ,l,h THEN GO TO 1206 
1208 IF a* < 1 >■''»“ THEN LET h<op 
l-i»i BO TO 1213 
1210 LET 

1213 PRINT AT 2,0; p Data esetuzio 
ne operazione |_ET riga*3: 00 
SUB 5060 

SnceC9<ne-a 


1215 GG SUB SMB 
1220 LET glopJ«gg 
1230 GQ SUB 3060 
1240 LEI v#(opJ=a* 

1245 GL 5 t GO SUB 50901 IF SGN h 
top) “1 THEN PRINT "Questa spiri 
none maturi un interesse di 

"ì; GO SUB 5110: PRINT ir, li GQ 
TP 1260 

1250 PRINT "Queste Dptniiorìft g# 
fiwi uno «torno inter «mai per “ f 
1255 BO SUB 5100: PRINT t nt 
1260 SO SUB 5070 
1270 IF op-0 THEN RETURN 
1275 IF tacad»0 AND g( tapi >921 OR 
<g top» < «cedi THEN SO SUB 5055 
1200 RETURN 

1305 PRINT "GIROCONTD disposto v 
«r so terzi - 

1306 LET h (op>“— i« 

1310 PRINT A? 2,0; "Hei stabilito 
tu la data della operazione ?" 
i LET riga»3i LET col orine» 13e LE 
T C«l*2l 00 SUB 40 
1315 IF a*-"" THEN 60 TP 1310 
1320 IF a*{1)-”s 41 THEN 60 SUB 1 
390: 00 TP 1330 

1324 PRINT AT 3,0; 'Giorno di e«e 
emione ?""t LET riga»4 

1325 GO SUB 3060 

1330 SD SUB 5000: LET gfopl-gg 
133^ RO SUB 3000: LET v* topi -a* 
1340 CLS i 60 SUB 5090 
1343 PRINT "Guest e oper Azione gè 
nere uno starno i nt eressi per 
"f 

1349 SD SUB 5100: PRINT int 

1350 SO SUB 50701 IF op-0 THEN 
RETURN 

1355 IF <*CAd*>0 AND g.(ap>>92) OR 
(giopXecad) THEN SO SUB 5055 
1360 RETURN 

1365 PRINT AT 4,0; 'Data stabilii 
a ?-| LET nga^S: 60 SUB 5060 
1386 LET g]-gl-l; GO SUB 3045 
1390 LET iib-Uì SO SUB 3010 
1395 RETURN 

1405 PRINT ” ADDEBITAMENE in cùft 
to di efTett 

1 p ASSi Vi M 

1409 LET Map)*-ie 

1410 PRINT AT 2,0! 'Et Tetto a via 
te 7;“: LET riga-2i LET colonne» 
IV: LET cort*2i GO SUB 401 IF a*» 
Mn THEN 00 TO 1410 

1415 IF a* U )»"«" THEN BD TO 14 
60 

1420 PRINT "Scadenza deli eHett 


o ?“i LET riga-4» GO SUB 5060 
1425 SD SUB 5000 e LET g<Qp)»gg 
1430 90 SUB 50901 LET v*<op>-s* 
1435 OLS e 90 SUB 5090 
1440 PRINT "Queste operazione ge 
nera uno «torno interessi per 
“ l> 60 SUB 5 100 e PRINT Int 
1445 GO SUB 5070] IF op-0 THEN 
RETURN 

1450 IF <»cad»0 AND g<op)>92> OR 
<Q topXsced) THEN SO SUB 5055 
1455 RETURN 

1460 PRINT "Giorno di paganaento 
7 M z LET riga»4i SO SUB 5060 
1470 GO TO 1425 

1505 PRINT "'Effetti passivi dami 
ci listi presso le banca 1 * 

1510 LET h (op> »-i * 

1520 GO TO 1420 

1605 PRINT "Addebito effetti ins 
□ luti "i LET li (api »-in 
1610 PRINT AT 2, 0| "L 'effetto e' 
e viste? “e LET riga*2: LET cola 
rm*-24i LET cod»2e GD SUB 40: IF 
A*-"” THEN 90 TO 1610 
1615 IF i*(U-V OR a*(ll-*N" T 
HEN GO TO 1420 

1620 IF AND ì«(1K>"S 

"* THEN GO TO 1610 
1625 PRINT AT 3,0; 'Scadente su p 
lazze □ na?"E LEI rigala LET co 
lonna-24i LET con»2i SO SUB 40; 

IF a*-"“ THEN SO TO 1625 
1630 LET b*=a* 

1635 PRINT AT 3,0; "Gì orno dell 'e 
ddebi Lamento del- l'effetto 
LET riga»? e 90 SUB 5060 
163G LET gl*tìl-(7 AND &*»*■« " OR 
b*»'S")-(20 AND b*»"n M OR b*-"N" 

J 

1640 GO SUB 5045 

1645 90 SUB 50001 LET g(op)»gg 

1650 SD SUB 5060; LET v*(op)-a* 

16S5 CLS i GO SUB 5090 

1660 PRINT "Queste operazione ge 
nere ung «torno interessi per 
*Jl SO SUB 51001 PRINT int 
1665 GO SUB 5070* IF op=0 THEN 
RETURN 

1670 IF (eced-0 AND gfop>>921 OR 
lg(apXscad> THEN GO SUB 5055 
16B0 RETURN 

1705 PRINT "Assegni di terzi già 
accredita ti risultati ineolut 

1 " 

1710 LET h(op>— lm 

1715 PRINT AT 2,0; “data in cui f 

urona accreditati ?"t LET r|g**3 



i 60 SUB 50Ó0 

1720 SO SUB 5000! LET gtopì-gg 
1725 BO SUB 5030: LET v* topi -a* 
1730 CLS i SO SUB 5090 
1750 FRINÌ “DuwU operazione ge 
nera uno storno interessi per 
lh tt SO SUB 51001 PRIMI int 
1700 GO SUB 50701 IF np-0 THEN 
RETURN 

1790 IF (*£*(**0 AND g top ) >92 1 OR 
tgtapK scadi THEN SO SUB 3055 
1795 RETURN 

1305 PRIMI '‘Acquisto titoli in r 
on tanti " 

1B10 SO TO 1010 

1905 PRINT «Estinzione enti ci pax 
ion» con scadenza fissa 1 ' 

1910 LET h (opJ— im 

1920 PRINT AT 2,0* "Giorno di est 

inzi ori* ? M i LET riga-3! 60 SUB 5 

0À0 

1930 BO TD 1150 

2005 PRINT "Estinzione di nota d 
1 pegno" 

2010 00 TD 1910 

2105 PRINT “Estinzione riporto f 
inanzisricT 
2110 LET BtopJ— im 
2120 PRINT "Giorno di esecuzione 
7"i LET riga-3i 60 SUB 5060 
2130 BO TO 1115 

2205 PRINT “Coiai asiani per effe 
tti accredi tati all 'incasso e s 
*b. f - " 

2210 LET htnpl — in 
2220 PRINT "Giorno in cui gli «f 
fatti sono stati assunti ?*l LET 
riga-li GO SUB 5000 
2230 GO TO 1720 

2305 PRINT “Spese par servizi r« 
si dalla banca" 

2310 BO TO 1010 

2405 PRINT "Pagamento imposte" 

2410 LET htopl--i« 

2420 PRINT ‘'Giorno di pagamento 
7 “1 LET riga-4ì BO SUB 5060 
2430 00 TO 1720 

2505 PRINT “Addato! tementi non al 
tri menti specificati* 

2310 SO TD 2120 

2605 PRINT “Versamento di denera 
cantante" 

2610 LET h topi eia 

2620 LET gl-gl+li SO SUB 5010 

2630 SO SUB 5000 

2640 LEI g (op)-gg 

2645 SO SUB 50B0 

2650 LEI vi topi «a* 



2*60 PRINT 1 BP SUB 5090 
2670 PRINT f PRINT “Questa oper 
azione genera un interesse p 
er 

2675 BO SUB 51101 PRINT int 
26B0 BO SUB 50701 IF op-0 THEN 
RETURN 

2ùB5 IF tsoad-0 AND g topi >92) OR 
tg topi < scadi THEN SO SUB 5055 
2690 RETURN 

2705 PRINT "Versamento di assegn 
i circolari" 

2710 LET h (capi -imi LET gl-gl+2s 
GO SUB 5010 
2720 BO TO 2630 

2003 PRINT “Versamento assegni b 
ancar i " 

2010 LET h (api -im 
2BI5 PRINT AT 1,0|"L' magna a 
tratto sul tuo istituto ?" * 
LET r iga-2i LET colonna-li* LET 
COn-2» BO SUB 40» IF a*-“" THEN 
SD TD 2S15 

2B20 IF a*(l)<>“e" AND e*(ÌK>"n 

" THEN GO TO 2813 

2922 IF a*(lJ-“n* TFEN DO TO 28 

55 

2825 PRINT AT 3,0|"a carico dell 
a FLASH M"d"| FLASH 0| «ipend 
enza o w | FLASH i(“n"| FLASH 0; " 
a 7*j LET rigaMt LET col annali i 
SO SUB 40* IF a*-"" TfEN BO TO 
2B25 

2B2B IF ai ( 1 1 -"d" THEN LET gl-g 
1+1 i BO TO 2B33 

2829 IF «ftUOV THEN BO TQ 2 
825 

2830 LET gl-g 1+2 
2033 GO BUB 5010 

2B35 BO SUB 5000 « LET gtopl-gg 
2840 00 SUB 3000 1 LET v* topi -a* 
2845 CLS i PRINT i BO SUB 3090 
2848 PRINT ; PRINT "Quest* opera 
zi ori e matura un interessa di 

"|i GO SUB 5U0t PRINT mt 
2830 BO SUB 50701 IF Op-0 THEN 
RETURN 

2832 IF (Scad-0 AND g topi >921 OR 
Lg (api < scadi THEN 80 SUB 5055 
2B53 RETURN 

2055 PRINT AT 3 f 0* " Esi g i b i 1 a su 
piazza ?" a LET rlga-3t LÉT colori 
na-22i LET cpn-2i SO SUB 40 t IF 
aì= HH THEN GO TO 2GS5 
2838 IF aiti 1— “S - THEN LET gl-g 
1+2; 00 TO 2833 

2B60 PRINT AT 4 , 0; “ESI Si BI LE FUO 
RI PIAZZA 




2S63 PRINT AT 5,0|"-nella provin 
eia '?“■ LET riga-5i LET colonna^ 
19i GO SUB 40: IF a*-"" THEN GO 
TO 2H63 

2B65 IF *4(1) -"a" THEN LET gl-g 
l+4i GO TO 2033 

2870 FRINÌ AT 6,0f "-nella ragion 
e 7“ t LET rigaci LET coìonrca-19 
i 00 SUB 401 IF a**"" THEN GO T 
□ 2070 

2075 IF al(U-V THEN LET gl«g 
1+6; SO TO 2833 
20B0 LET gl-gl+Bi GO TO 2833 
2905 PRINT "Netto ricavo par ics 
ntq af fatti" 

2910 LET h top) -idi 
2915 PRINT "Data di accredito? " 
i LET riga-3i GO SUB 5060 
2920 LET gl-gi+li 00 SUB 5010 
2930 GO SUB 5000 
2940 LET g(op?-gg 
2950 GO SUB 50B0I LET v«lop)*s* 
2955 OLG a SO SUB 5090 
2960 PRINT “Guasta operazione ga 
nar a un interesse par "fi GO 

SUB 5110: PRINT int 
2965 GQ SUB 50701 IF op-0 THEN 
RETURN 

2970 IF É*cad-0 AND g(op>>92> OR 
(gtopXscad? THEN GO SUB 5055 
2980 RETURN 

3005 PRINT "Netto ricavo par ant 
i ci pacione * scadenza fissa 1 ' 
3010 GO TO 2910 

3105 PRINT "Netto ricavo per sco 
nto di note di pegno" 

3110 GO TO 2910 

3205 PRINT "Netto ricavo per are 
emipns di riporti finanziari" 
3210 GO TO 2910 

3305 PRINT "Ri nnovQ pagherò ' dir 

atti, anticipazioni o riporti" 

3310 LET htopW/n 

3320 PRINT "Data di scadenza del 

I r operai toner innovata 7"; LET ri 

ga=4 

3330 SO SUB 5060 
3340 SO TO 2930 

3405 PRINT "Effetti e ricévute b 
ancaria accreditata Salvo Bu 

□n Fine" 

3410 LET h(op)=ifli 

3415 PRINT AT 2 ,0| "Effetto a via 

ta ? " t LET rigaci LÉT colonna® 

18 i LET con ù 2i GO SUB 40 i IF a*- 

11 " THEN GO TO 3415 

3420 IF affi )<>"■" AND a*fli<>"n 

rt THEN GO TO 3415 


3425 IF *4(1? -"a" THEN 80 TO 34 
50 

3430 PRINT "Scadenza effetto ?"s 
LÉT riga=4: GO SUD 5060 
3435 PRINT AT 7,0f"3u piazza 
LET rig*-7i LET colanna-l2i LET 
con-2: GO SUB 40 i IF a*-"“ THEN 
GO TO 3435 

343B IF iillìOV AND a4UX>"n 
" THEN GQ TO 3435 
3440 IF a4(l?«"s" THEN LET gl-g 
1+10; GO TO 3445 
3443 LET gl^gl+20 
3445 GG SUB 5040; SO TO 2930 
3450 PRINT "Data di accredito ?" 
; LET riga=3; GO SUB 5060 
3453 PRINT "Su piazza 7': LET ri 
ga=6: LET colonna-12: LET cof>“2s 
GO SUB 40: IF a4-“* THEN GO TD 
3453 

3455 IF «4 (!><>"■" AND **<!>< >"n 

11 THEN GO IO 3455 

3460 IF a4 ( 1 ? " THEN LET gl-g 

1+15: GO TO 3470 

3465 LET gl-gl+25 

3470 GO SUB 5040: SO TO 2930 

3505 PRINT "Gi racon ti disposti d 

a terzi" 

3510 LET h 

3515 PRINT AT 2 T 0f "La valuta m' 
stabilita dal 1 'ordinante LET 

r|ga®3: LET colonnari 02 LET con 
-2: GQ SUB 40 1 IF a4“" , ‘ THEN GO 
TO 3515 

3520 IF *4ti?«"s" THEN LET riga 
-4: GO SUB 5060* GO TO 2930 
3530 IF a*{l)<>"n" THEN GO TO 3 
515 

3540 PRINT “Data dell'accredito 
?": LET riga-5: GO SUB 5060 
3545 GO TO 2920 

3605 PRINT "Effetti assunti al d 
OpO incasso" 

3610 GO TO 2910 

3705 PRINT "Vendita titoli par c 
ontani i " 

3710 LET h(op)-ijn 
3720 PRINT "Giorno di esecuzione 
del contratto ?"2 LET ri 

ga=3: GO SUB 5060 
3730 GO TO 2930 

3805 PRINT "Ricavo titoli rimbor 
sa t i " 

3810 LET h (api -ira 
3B15 PRINT AT 2, 0] "Titoli in eus 
lodi a ?"s LET riga-2; LET colonn 
a =21 ; LET con-2: GO SUB 40; IF a 
4^ N " THEN 00 TO 3815 
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3B20 I F a^lì'-s" THEN PRIMI “D 
ata del rimborsa 7"; LET r iga-4: 

GO SUB 5060: SO TQ 2920 
3340 SO TQ 2915 

3905 PRINT M Rie avo per la riscas 
siane di cedale e dividendi “ 
3910 LET diapiri* 

3915 PRINT AI 2,0; "Titoli in cus 
iodi a LET riga-2: PRIMI cala 

nna-21a LET con=2: GO SUB 403 IF 
a*-" " THEN GO TQ 3915 
3920 IF a*<l >-''»■* THEN FRINÌ "D 
ata di godi menta LET riga=4: 

GQ SUB 5060: GO TO 2920 
3930 1F a$in<>"n" THEN GO TO 3 
915 

3940 00 TO 2915 

4005 FRI NT ,r Acer eri i lamenti non a 
1 tri menti spedi I i ceti “ 

4010 m TO 2910 

4105 PRINT FLASH lj" Varia 

zi arte del ta«so " 

4110 PRINT AT 2,0; "Tassa eredita 
re ? p e LET riga=2: LET colonnari 
Si LET cnn^l e GO SUB 40: 1F **-" 
" THEN LET teri-tor: PRINT AT 2 
t lB;tcrj H GO TO 4120 

4115 LET ter 1 =VAL a* 

4120 PRINT AT 3,0; “Tassa debita 
re 7" { LET ri ga-3s LET eoi arnia» 1 
Sì 00 SUB 40: IF a*-"" THEN LET 
tdel^tde: PRINT AT S,lQ;tdm; M 
"i 00 TP 4130 
4125 LET tde 1 “VAL a* 

4130 IF td*-td*l AND tcr-teri TH 
EN PRINT " FLASH 1 ; “HAI INSERÌ 
TQ TASSI CON VALORI UBUA 

LI AI PRECEDENTI L ! !f : SO SUB 

490: GQ SUB 5050: RETURN 
4135 IF tdeOtdel AND tcrOterl 
THEN PRINT r ' "PUOI VARIARE UN 5 
OLO TASSO! M": SU SUB 490: SD SU 
B 5050: RETURN 

4140 SO SUB 5000: LET g<ap)^gg 

4150 GO SUB 5060: LET v$<ap)=a# 

4155 60 SUB 5090 

4160 SO SUB 5070: IF op=0 THEN 

RETURN 

4170 IF Cscad-0 AND gCcp>>92> OR 
Cg(op)<*cad> THEN GO SUB 5055 
41B0 RETURN 

4205 PRINT INVERSE i ; 11 CHI 

USURA DEL CONTO 
4210 GO TO 4140 

5004 LET gg-0 

5005 FQR n=dil TO 12: LET gg=gg+m 
<n)t NEXT n: LET gg-gfl-gl: RETUR 
N 


5015 LET aa-al-1901 

5016 LET g g = 365 # a a+ 1 NT Caa/4Ì 
5020 FOR n= 1 TG ml-ia LET gg-gg+ 
min): NEXT n 

5022 LET gg-gg + gli LET gg^gg-7#! 

NT < gg/7) +1 

5025 LET a*-d*<gg> 

5030 IF «*(1)0-3" AND a*(l)<>"d 
11 THEN RETURN 

5033 IF SGN ini— 1 THEN GO TO 50 
36 

5035 LET gl = (gl+2 AND a*(l)- J, s") 

AND GO SUB 50 

40 

5037 RETURN 

5036 LET g 1 = Cg 1 — 2 AMD a*a>= J, d") 

+ tgl“l AND GO SUB 50 

45 

5039 RETURN 

5042 IF gl>mtml> THEN LET gl=gi 
-fflimU: LET fiil*=ml+l: IF inl=13 TH 
EN LET al-al+ts LET ml*12 
5044 RETURN 

5047 IF g 1< 1 THEN LET gl“mfml“i 
)-gIi LET ml-ml-1: IF mi— 1 THEN 
LET ml=i2: LET al-al-i 
5046 RETURN 

5053 LET h(ap)=0i LET h$<op)^ ,M : 
LET f * tapi ■" " : LET f Copiai LET 
vf < op X ,h “ i LET gtcp>-0: LET ap- 

op-1 

5054 RETURN 

5056 LET opl-apl+1 

5057 LET p* Capi) -h* Capi* LET pio 
pn= i h<apj: LET (api ) “f 4 <op> : L 
ET y# (api )=v# (cp) : LET j top 1 ) «g t 
ap ) s LET y(opl)^fCop) 

5050 IF eaad-0 AND VAL Capi) 17 
TG G > -anno- 1900 THEN LET k=(VA 
L j$ topi > C 7 TO en + 1: LET j$(opl 
) (7 TO 8)^STR* k 
5059 GO SUB 5050: RETURN 

5061 LET mentir iga: PRINT AT riga 
t 0; N anno ": LET con= 1 : LET col 
onna=G: 60 SUB 40: IF a*» ,p " THEN 

GO TO 5061 

5062 LET a 1— VAL a*: IF *l<Ì9Bi O 
R al >2000 THEN GO TQ 5061 

5063 LET riga^mem+l 

5064 PRINT AT riga, 0; " mese " i 
LET col □nna=8i SO SUB 40! IF a*- 

THEN 60 TO 5064 

5065 LET mi “VAL a#; IF ml<l OR m 
1 >12 THEN 60 TO 5064 

5066 LET riga-mem+2 

5067 PRINT AT riga, 0; "giamo "i 
LET colonnari 60 SUB 40: IF a**= 
"" THEN GO TO 5067 


m 
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5060 LET gl=VAL a$: IF gl<l OR g 
1 >m (mi ) THEN 60 TU 506? 

5069 RETURN 

5072 FRI NT AT 21 , 0 ; " Conf armi lo 
perazime?"; LET con>2i LET riga 
*21; LET col □fina* 1 23; G0 SUB 40: 
1F a*-"» THEN GO TG 5072 
5074 GO SUB 9B5s IF A 

ND ■*tl)<)"N" THEN GO TO 5072 
5076 IF **<1 ) - M N W THEN GO SUB 5 
050 

5070 RETURN 

50S2 LET a**”"! IF gl<10 THEN L 
ET a$- IH 0" 

5084 LET a**a*+STR$ gl+"/"t IF m 
1< 10 THEN LET **-#$+"0" 

50S6 LET a*-a*+STR* mi +' /"* LET 
a*“a*+0TR* (al— 1900) 

5000 RETURN 

5092 FRI NT ' "DATA; f $ < op) 

5093 PRINT "VALUTA* ";v*(op) 

5096 PRINT " IMPORTO ; ";hlop> AN 
D h*(opX>"VAR" AND h*(opK>"CHI 

5098 RETURN 

5105 LET int*INT C Um*g (op) *td*) 
/ 365001 
5108 RETURN 

5115 LET int-INT i (im*g <op) *tcr ) 
/ 36500) 

5118 RETURN 

5125 LET ri-li PRINT #0; "FREMI U 
N TASTO PER IL CtlPY) tt 

5130 IF INKEY#*" " THEN GO TO 51 
30 

5135 EF INKEY^-^C' 1 OR INKÈY*-"c* 
THEN LPRINT i LFRINT i COPY 
5140 CLS i RETURN 

6000 REM correzione variabili in 
seguito à risposta nega 
tiva alla capi tal izzaz. 
6005 LET snu=0s LET saldo*0; DIN 
1 U20J : DIM qt!20>: LET snua=0t 
LET snudi -0 

6010 LET x*t des LET tde**tdei; LE 
T tdei*** 

6020 LET Ji-tcrr LET tcr-tcrl: LE 
T teri-x 
6030 RETURN 

6050 REM verifica se tra 1# oper 
azioni esistono le operazioni 
"CHI" e "VAR" che non devono pag 
are la spesa di tenuta conto* 
6060 FOR S^l TO op 
6065 IF h*ts)«"CHl" THEN LET sp 

=Sp“StC 

6070 IF h* ( s) -"VAR" THEN LET sp 

^Sp^StC 


6080 NEXT i: RETURN 
9900 REM help 

9903 LET m-1* BORDER 4i PAPER 4 
9905 CLS i PUR n=0 TO 20 STEP 2 
9910 PRINT BRIBHT lj INK 1 ; AT n 
t 0;c$(n) 

9913 LET NEXT n 

9920 INK 0 e PRINT AT 0 T 5;"PrelÌe 

va di contante o con assegn 

0 circolare" 

9921 PRINT AT 2 ,5; "Prel ievo con 
assegno" 

9922 PRINT AT 4,5; "Giroconti dis 

poeti a -favore proprio" 

9923 PRINT AT 6,5; “Bàrocohti dis 

pasti a favore di terzi" 

9924 PRINT AT 8,5? "Addebito effe 
tto cambiaria 1 ' 

9925 PRINT AT 10,5; “Eff ett i pass 

ivi in scadenza domiciliati 

presso la banca" 

9926 PRINT AT 12,5; "Effetti gia r 

accreditati ri saltati inso 

luti" 

9927 PRINT AT 14,5} "Assegni di t 

erzi accredita ti , risultat 

1 insoluti " 

9920 PRINT AT 16,5* "Costo per ac 
quieto titoli por contanti 

9929 PRINT AT 18,5; "E&tinz ione d 

i anticipazioni a scadenza f 

issa" 

9930 PRINT AT 20,5; "Estinzi one d 
i note di pegno" 

9931 GO SUB 5120 

9932 FOR n=0 TO 20 STEP 2 

9935 PRINT BR1GHT 1; INK 1;AT n 

,0;c#<mì; LET NEXT n 

9936 PRINT AT 0,5; "Estinzione di 

r i porti f inan zi ari 11 

9937 PRINT AT 2,5; “Commi s. e dir 

itti per gli effetti all r i 

ncasso e s.b.f" 

9938 PRINT AT 4,5; "Spese per ser 

vizi resi dal- la banca" 

9939 PRINT AT 6,5; "Pagamento i mp 
oste" 

9940 PRINT AT 0 , 5; "Opera* i ani di 

addebito non altrimenti sp 

edificate" 

9941 PRINT AT 1 0 , 5} "Versament i i 
n contanti" 

9942 PRINT AT 12 , 5; "Versament i d 

i assegni ci r- col ari e pos 

tali " 

9943 PRINT AT 14,5; "Versamenti c 

□n assegni trat ti sull 'isti 
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tuto e non' 1 

9944 PRINT AT 16,5» "Netto ricava 
■canta effetti" 

9943 PRINT AT 1B, 5» "Netta ricavo 
■conto enti ci pai ioni a *C 

■danza 

994 6 PRINT AT 20 , 5» 41 Inatto ricavo 

■conto nota di pan-no 11 

9947 GQ SUB 3120 

9940 FQfl n-0 TD 20 STEP 2 
9949 PRINT 0RISHT li INK 1|AT n 
,0»c*(a)i LET m=«+ii NEXT n 

9930 PRINT AT 0,5| "Natta ricavo 

par accanai an* di riporti fi 

nani i ari " 

9931 PRINT AT 2,5» "Rinnovo di pa 

ghff □ ' diratti anticipazioni 

a riparti " 

9954 PRINT AT 4 ,5» “Effetti accra 
di tati con ia clausola Salv 

0 Buon Fina” 

9935 PRINT AT 6,5» "Girocunti O b 

ani ti ci diapo- *ti a n*/ fav 

ara da tarli” 

9936 PRINT AT 0,3* M Ef fatti attuo 

ti al dopa Incesto" 

9957 PRINT AT 10,5» "Ricavo per i 
a vendita di titoli par c 

potanti 11 

9930 PRINT AT 12,5» "Ricavo par 1 
a riscossione di titoli ri 

mtoorsati " 

9939 PRINT AT 14, 5» "Ricavo par 1 
a ri eco*» ione di dividendi 

a cedola" 

9960 PRINT AT 16,5; "Operazioni d 

1 accredito non altrimenti a 

pacificata” 

9962 PRINT AT 10,3» "Ver iasione d 

al tasso” 

9963 PRINT AT 20,3» "iati ni ione d 
al conto" 

9963 60 SUB 5120 

9970 BDRDER t> PAPER li INK 7 

9900 RETURN 

999B BDRDER li PAPER li INK 7 

9991 CLS 

9992 INPUT "codice d J accesso 7 
"l LINE a* 

9995 IF af-nf THEN GQ SUB 9999 i 
SO TQ 500 

9996 PRINT AT 10,3» ''ACCESSO NON 
CONSENTITO* !" 

9997 FGR o-30 TO “30 STEP “Il BE 
EP , i,o* NEXT os PAUSE 30 s □□ TO 

9991 

9999 PRINT AT 10,7» "ACCESSO CON0 
ENT ITO. " ; PAUSE 71* RETURN 



Music compiler 

1 POKE 23650,0 

2 LEI ao-B 
9 CLS 

10 PRINT FLASH !|AT 0 f 13t«M£N 

U'" 

20 PRINT AT 5,6» "U INTRODUZIO 
NE DATI" 

30 PR3NT AT B f 6» “21 ANALISI DA 
TI IN MEMORIA" 

40 PRINT AT 11,6» "31 CARICAMEn 
TO DAT I N 

50 PRINT AT i4,6|" r 4> SALV AT AGG 
IO DATI" 


60 

PAUSE 0 




70 

IF 

INKEY*-"1" 

THEN 

00 

TO 1 

:0 

G0 

IF 

INKEY#-"2" 

THEN 

00 

TD S 

0 

90 

IF 

INKE¥** ,I 3" 

THEN 

SG 

SUB 

2101 

GQ 

l TG 3070 




100 

IF 

INKEY*-“4“ 

THEN 

00 

TQ S 


150 

ne GQ TQ 60 

121 LET d**" "i LET i-0 

130 GQ SUB 1500 

170 I NPUT "autore?"» a* 

100 IF LEN a* <3 TH£N LET a*-a* 
+d*U TD I5 — LEN a*U 
105 PRINT BRIGHT I»AT 2,1*1** 
190 INPUT "titola?" »b* 

200 IF LEN b*<3 THEN LET b*-b* 
+d*(l TO (5“LEN bin 
203 PRINT BRIGHI I»AT 3,10»&* 
210 LET x*-e«Cl TO 5)+t*(l TQ 5 

1 

230 INPUT "tonalità "»c* 

240 PRINT BRIGHI l»AT S,lS»c* 
242 INPUT "tempo in chiava?" | a* 
245 PRINT BRIGHI 1 » AT ll,10»e* 
250 INPUT "nua. voci?-| v* 

260 PAINI BRIGHI 1»AT 14,i0»v* 
270 PRINT #0» "premi un tasto pe 
r continuare" 

260 PAUSE 0 

283 LET 0-VAL v*i LET a-1 
290 DIM t*(S, 14) i DIM n (350,0): 
DIM p* (330,0,9) i DIM tUBJi DIM 
u (330,0) 

300 LET 

310 LEI t*(3)-b* 

320 LET t*(31-e* 

330 LET t*<4)-#* 

340 LET t* (31 "v# 

350 0-6 
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360 PLOT B,64j DRAM 253,0 

370 FDR n*0 TO 255 STEP 32 

371 I F n -Gl OR n^96 Clft n-224 THt 
N LET i=iU: 60 TO 380 

372 LET *-32 

300 PLOT n,64s DRAW U,à 
390 NEXT n 

400 FDR n-20 TO 76 STEF 32 
410 PLOT n,96s DRAM 24,0 
420 PLOT n,96i E>RAW 0,79 
430 PLOT n+24,96: DRflW 0*79 
440 NEKT n 

450 POR P-116 TD 204 STEP 32 

460 PLOT n, 96: DRAW 24,0 

470 PLOT 6,96: DRAW 0,79 

430 PLOT r é+24, 96: DRAM 0,79 

49® NEXT n 

491 SO SUB 5230 

500 PRINT Af 17, 1) ”NOTAi" 

510 PRINT AT 20,13 'VALORE:" 

520 PLOT 100,0: DRAWl 0,56 
530 PRINT AT 17, 13$ 11 A) OTT.C” 
540 FRI NT AT 18*!3$ << B>I OTF.B" 
550 FRI NT AT 19, 13$ ”02 QTT.B*' 
560 PRINT AT 20,13$ U D> 3 QTT.B" 
570 FRI NT AT 21,13$ “EM OTT-A 1 ’ 
580 PLOT 180,0; DRAW 0,36 
590 FRINÌ AT 17,23; “FI 2 QTI . A" 
600 PRINT AT 18,23$ “GIS ÙTT. A 1 ' 
619 LET h«l : LET u»l a LEI ur*0 

621 LET M *-0 

622 SO SUB 620 

625 INPUT "nota a ottava' 1 3 y$ 

630 IF y$ a "S Ji THEN SO SUB 832: 
SO SUB 320 

631 1F b>VAL t*t&> THEN 80 TO 


20,B;y*U TO 4) s 80 TO 637 

656 FRINÌ AT 20,0; y* 

657 LET p* (s,h>>y* 

658 LET r-VAL p*is,h> 

659 LET M“4c+r 

660 IF ao-VAL t$I4> THEN BEEP 

1,0: LET LET ur=ur+l 

667 LET s=s+l 

668 BO TD 620 

669 LET a*l; LET b=B: LET c=0 

670 FDR n— 1 TO 13 

671 LET c-C+1 

672 READ ó 

673 IF c=6 DR C-13 THEN LET a® 
a+2i SO TO 678 

675 IF b- 1 2 THEN LET b“8i GD T 
0 678 

676 IK b=*tì THEN LET b^Ì2 
670 FRI NT AT b,a; JI 

680 PRINT AT b,a;d 
700 LE] a=a+2 
710 NEXT n 
720 GO TO 620 

750 DATA 0,1,2,3,4,5,6,7,8,9,10 
*11,12 

760 DATA -12, -U, -10, “9, -6, -7,™ 
6,-5, -4, «3,-2, -1,0 
770 DATA «24, -23,-22,-21, -20,-1 
9, “18, -17,-16, -15,-14,-13, “12 
7 00 DATA -36, -35, -34, -33, -32, -3 
1 , —30 ,-29 , -28 , -27 , -26 , -25 , “24 
793 DATA 12,13, 14, 15,16, 17, iS, 1 
9,20,21,22,23,24 
000 DATA 24,25,26,27,28,29,30,3 
1,32,33,34,35,36 
BIG DATA 36,37,38,39,40,41,42,4 


632 IF y*»"S" THEN LET «“li SO 
TO 625 

640 IF CODE y# >-65 AND CODE y*< 
=71 THEN LET x=CODE yS; LET x-x 
*10+100: RESTORE x: SO TO 669 

641 IF CODE y*<48 AND CODE y$>5 
7 THEN SO TD 625 

642 FRINÌ AT 17,8;" 

643 PRINT AT l7,tì;y* 

644 IF y*-"P” THEN LET +-S0: G 
□ TD 652 

645 IF LEN y$*l THEN SO TO 650 

646 LET r=LEN y* 

647 IF y*fr TO rl- 4, B" THEN LET 
f-VAL y* ( 1 TD r-1 > : GD TO 652 

650 LEI -f «VAL y* 

651 GD SUB 3000 

652 LEI n (a*h) “f 

653 INPUT 'valore" ;y* 

654 PRINT AT 20,8;" 

655 IF LEN y*>4 THEN PRINT AT 


3,44,45,46,47,40 

819 STOP 

820 PRINT FLASH 1 ; AT 13,3$h? " 
vaca" 

830 RETURN 

832 LET 

833 LET h^h+1 

835 RETURN 

040 ED SUB 1500 

841 PRINT BRIGHI 1 ; AT 0,13$ "AN 
ALISI " 

B4? LET b^2 

843 POR TD 5 

944 FRINT BRIGHI X ; AT b,l0;t*< 
m) 

S45 LET 6*6+3 

046 NEXT m 

847 FRINÌ 40; "premi un tasto pe 
r continuare' 1 

848 PAUSE 0 

850 CLS 

860 PRINT BRIGHI 1 ; AT 0 , 1 1 ; AN 


■3# • Smc^Ccmp-Hcf 


ALISI " 

4> ESiCJJZIGN 

0 2280 






913 PRINT AT 11,01" 
E“ 

2170 IF 
0 2280 

a-3 

THEN 

LET 

j — 70* 

SO T 

913 PRINT AT 13,0» " 

51 TRASPORTO 

2180 IF 
G 2280 

£-4 

THEN 

LET 

j-80; 

80 T 

917 PRINT AT 17,0* " 
AI IONE DATA" 

71 VISUALI 21 

2190 IF 
TO 2280 

*“5 

THEN 

LET 

j-1001 

GD 

91B PRINT AT 19,0* * 
£NU" 

8) RITORNO M 

2200 IF 
TO 22B0 

*»6 

THEN 

LET 

j-1101 

60 

920 PAUSE 0 

930 LEI **-EMt€Y* 


2210 IF 
TO 2280 

»«7 

THEN 

LET 

j-1201 

GO 

982 IF THEN 

* SU TO 2010 

GO SUB 1390 

2220 I F 
TO 2280 

*-8 

THEN 

LET 

j-1351 

GU 

984 IF »6- pp 5 4P THEN 
987 IF ■•-'■7 1 * THEN 

00 TO 3200 

0G SUB 1390 

3230 IF 
TO 2280 

»-9 

THEN 

LET 

Ì-1501 

80 

« SO TO 6130 


2240 IF 

*-18 THEN 

LET 

j-160 

fi GO 


98S IF »#-«& 1 THEN GO TO 2 
990 00 TO 920 
1500 CL3 

1510 PRINT AT 2,Ìi 4, AUTOREi " 

1320 PRIMI AT 5, 1 1 ‘'TITOLO! * 

1530 PRINT AT 8,1*"' TOMAL I TA i “ 
1540 PNJHT AT il, 1} 'TEMPO IN Chi 
AVE; 11 

1550 PRIMI AT 14, M'-NUrt. VOCI!* 1 
1560 RETURN 

1590 INPUT "vocb?*|A 

1591 IF h< s’VAL t*(5> THEN RETUR 
N 

1595 IF h >VAL t*t51 THEN PRINT 
FLASH IjAT 21 ,01 "LA VOCE N. H t hj 

* NON E STATA INSERITA"' l PAUSE 1 
20 

1596 PRIMI AT 21, 0* "' 

"I DO TO 159 


TO 2280 

2250 IF *-ll THEN SO TO 2270 
2260 GO IO 2140 

2270 INPUT "v*ioeita H aatronooo 

<40-2081 j 

2300 LET r-j/60 

2310 LiT j-r/ tr^2>*4 

2320 FOR m-1 TO z£h>-l 

2325 IF n<B,hl-30 THEN PAUSE j/ 

(VAL 00 TO 2340 

2330 BEEP INT J«<VAL pKMH.tlI 
n,h> +chl *vbp 

2331 LET li ( m T h ) ■ I NT j*£VAL p4£m, 
hi ) 

2340 NEXT m 

2345 IF *t*l THEN GO TO 5900 
2350 PRINT NB; "pruni un t itto pm 
r continuire" 

2360 PAUSE 0s DO TQ 040 
2999 STOP 


2015 LEI chUvw-0 

2020 CLS i PRINT BRIGHT 1 f AT 0, 
1 1 * "ESECUZIONE “ 

2030 PRINT AT 5,4* J1 1) LARGO 1 ' 

2040 PRINT AT 6 t 4|”2> LARGHETTO" 
2050 PRINT AT 7,4* "31 ADAGIO" 
2060 PRINT AT 0,4* "4> ANDANTE' 
2070 PRINT AT 9,4* “51 ANDANTINO" 
2080 PRIMI AT 10, 4l*6) MODERATO' 1 
2090 PRINT AT ll,4| w 7> ALLEGRO M 
A NON TROPPO 1 ' 

2100 PRINT AT Ì2,4|"8> ALLEGRO Jh 
2110 PRINT AT 13,4* ’9J ALLEGRO B 
PILLANTE" 

2120 PRINT AT 14,3* u 10) PRESTO" 
2130 PRIMI AT 15, 3* 11 11) NETRONQM 
D" 

2135 LET 
2140 INPUT s 

2150 IF *«i THEN LET j~50t GO T 
0 2200 

2160 IF *-2 THEN LET j-60s 00 T 


3000 LEI *q-l 

3005 IF t»T3>- q 0a MAS. " 0 

R t* (3) -"LA MIN* " THEN R 

ETURN 

301® IF t# !3>- M SOL MAG* 11 U 

R t*(3>- ,p MI MIN. " THEN L 

ET **— 31 1 LET *t-4Ls GO SUD 315 
0: RETURN 

3020 IF t*(3)-”ftE MAS. " Ù 

R t*«3>“ p, SI MIN* 11 THEN L 

ET £*“-31 i LET *t-41i GO SUB 316 
01 LET **— 36i LEI *t-48i SU SUB 
31601 RETURN 

3030 IF t#C3)“*LA MAG, " O 

R t*t3J*'TA# MIN* M THEN L 

ET H6--31; LET *t“4li GO SUB 316 
0; LET •*— 36i LET *t^40i GG SUB 
316B1 LET — 29i LET *t-43i GO 
SUD 3160; RETURN 

3040 IF t*<3!*-!11 MAS. “ O 

R t4 ( 3 ) “ "DGH MIN, * THEN L 

ET »m— Jli LEI *t-41i GO SUB 316 



Bs LET 3ói LEI *t SÈ 48ì 00 SUB 
3160 : LET ss- 29: LET st“43; GG 
SUB 3160 1 LET aa— 34i LET *t-3S 
: GO SUB 3160: RETURN 
3050 IF t$<3>»"SI «AB. - O 

R t*(3)“"SQL* MIN, * THEN L 

ET mi"-3 1 e LET afc- 41* 00 SUB 31* 
0; LET ss— 36: LET st=4S: GO SUB 
3160: LET sm*-29* LET st*43: GO 
SUB 3 160 E LET sa— 34 E LET et «*30 
i GO SUB 31601 LET a*— 27* LET a 
t=45i GO SUB 31601 RETURN 
3060 IF t*(3>-"FA# MAG. " 0 

R t*<3>=* M RE# MIN. " THEN L 

ET ss— 31: LET st*41i GO SUB 316 
■0* LET ss- 34: LET st~4Q: GO SUB 
31 60 e LET ss- 29* LET et -43: GO 
SUB 31601 LET a»— 34 e LET et-3B 
s GO SUB 31601 LET a»— 27 1 LET * 
t=45: GO SUB 31601 LET aa— 32 e L 
ET stM0: GG SUB 3160: RETURN 
3065 LET sq«2 

3070 IF t*<3*-"FA NAG, 11 Q 

R t*(3>~"RE MIN* * THEN L 

ET aa— 25 1 LET at-47i GO SUB 316 
0i RETURN 

3000 IE t*(3ì-"SlB MAG* " O 

R t*E3J» |, G0L MIN* " THEN L 

ET ss--25: LET et *47; GO SUB 316 
0; LET sa— 32: LET at^40i SO BOB 
3160: RETURN 

3090 IF t*<3>“"MIB MAS. " P 

R t^(3)- ,, DO MIN* " THEN L 

ET hs=- 2S: LEI et *47* GO SUB 316 
01 LEI *S— 32: LET et-40i GO SUB 
3 160 e LET bs- 27 1 LET st^43i GO 
SUB 31601 RETURN 
3100 IF t$<3J* J 'LAB MAO* 11 O 

R t$<3J*=“FA MIN, " THEN L 

ET SS— 25; LET at-47i GO SUB 316 
0: LET aa— 32 1 LET at»40i GO SUB 
3160: LET ss=-27: LET *t**43: GO 
SUB 3160! LET ss— 34! LET st-3B 
; GO SUB 3160: RETURN 
3110 IF t*<3>“"REB MAS* H Q 

R tt<3)=“SIB MIN* 11 THEN L 

ET a»— 2Si LET »t**47: SO SUB 316 
0i LET a* 1 — 32: LET ut -40* GO SUB 
3160: LET aa— 27 f LET *t*43i Gl 0 
SUB 3160: LET «■— 34i LET *t-3G 
! GO SUB 31601 LET aa— 29: LET e 
t ®43 1 GO SUB 3160: RETURN 
3120 IF t$43) = M SQL9 MAS. M Q 

R t*<3ì“"MIB MIN. H THEN L 

ET aa— 25s LET at-47t SO SUB 316 
0s LET ss— 32: LET st~40i GO SUB 
3160: LET ss— 27: LET st“43i GO 
SUB 3160: LET a a— 34: LET at-3S 


: GG SUB 3160: LET as— 29* LET 6 
t=43: GO SUB 3160; LET «a— 36: L 
ET st=4S: SO SUB 3160: RETURN 
3160 POR q=as TO «t STER 12 
3170 IF 4*q AND sq°l THEN LET 4 
=*f+l 

3175 IF 4«=q AND *q=2 THEN LET f 
= 4-1 

3100 NEXT q 
3190 RETURN 

3200 INPUT "tr importo? 1 '? eh i ave 
3210 GO TO 2020 
3220 CLS 

3222 LET a*-™i LET qu~0 
3225 GO SUB 1610 

5070 PRINT FLASH l;AT 21 t 4 f} "*W 

VIA IL RESI STRATORE 

50B0 LOAD M* DATA t$U 

5090 LOAD x* DATA nO 

5100 LOAD x* DATA p* O 

5110 LOAD x* DATA :() 

5120 PRINT AT 21,4;“ 

5130 PRINT BRIGHI IjAT 21 ,4f H CA 
R 1 C AMÉNTO EFFE TTU ATO " 

SI 40 GO TO 1 

5150 SAVE x* DATA 1*0 

5160 SAVE k* DATA nO 

5170 SAVE X* DATA p*0 

51B0 SAVE x$ DATA xO 

5190 PRINT FLASH 1 ; AT 2l,4;"SAL 

V AT ASG 1 0 EFFE TTU ATO “ 

5200 GO TG 1 
5210 LET d$=" 

5220 INPUT "autore? " 5 a* 

5230 IF LEN a* <5 THEN LET a=5-L 
EN a*: LET a*^a*+d$ < 1 TD al 
5240 INPUT J, titnln? 4, fb* 

5250 IF LEN b*<3 THEN LET a=5-L 
EN b*i LET b*~b*+t*$U TO 
5260 LET x*»a$U TO 5>+b*U TO 5 
ì 


5270 RETURN 


5200 

PRINT 

AT 

3 f 

3] "DO#" 

5290 

PRINT 

AT 

5> 

3; "REb" 

5300 

PRINT 

AT 

11 

T l|"DO ,r 

,5; "RE" 

5310 

PRINT 

AT 

lì 

5320 

PRINT 

AT 

3, 

7; "RE#" 

5330 

PRINT 

AT 

5* 

7| "MiIb N 

5340 

PRINT 

AT 

11 

,9; "MI" 

5350 

PRINT 

AT 

11 

t 13f "FA” 

5360 

PRINT 

AT 

3, 

15; "FA#" 

5370 

PRINT 

AT 

5i 

15; "SOL" 

53B0 

PRINT 

AT 

6, 

16; "b” 

5390 

PRINT 

AT 

li 

,17; "SOL 1 

5400 

PRINT 

Al 

3, 

19; “SOL" 

5410 

PRINT 

AT 

4, 

20; 

5420 

PRINT 

AT 

5, 

19; "LAb H ‘ 


5430 PRINT AT Ì1,21|"LA M 
5440 PRINT AT 3,23; "LA#" 

5450 PRINT AT 5,23p"Blb" 

5460 PRINT AT 11,25; “SI" 

5470 PRINT AT 
5400 RETURN 
^ i 30 CLS 

6140 PRINT BRIGHI 1;AT 0,12j"DA 
TA" 

6145 PRINT 

6146 PRINT 
6170 POR m-1 TO 

6100 PRINT 11 v 11 ) n 4m,h> | %" 

f 

6190 NEXT m 

6200 PRENT #0; " premi un taato pe 
r continuare 1 ' 

6210 PAUSE 0 
6220 SO TO S50 
909 9 STOP 


250 LET a*-a*+"X" 

260 NEXT b 
270 PRINT #5; a* 

230 NEXT a 
290 STOP 

9999 SA VE M BI ANT SIZE" 

Quicksort 


1 REM 


I 

j GUICK0ORT 

I 

■ di Fabio Gemo. 


Gigantografie 


5 REM "GIANT SUE" 

6 REM by Marco Ber t ani 1985 
10 REM gestione stampante 

20 CLEAR #s FORMAT "b'jRbGG* O 
PEN #4, ,l b"> FORMAT M t";9600s OPE 
N REM apertura canali di 

comuni catione 

30 PRINT #4'jCHR* 27; CHR* 4B: R 
EM riduzione interlinea 
50 REM carica seti ermo 
60 LQAD " " BCREEN* 

70 REM inizio iterazioni 
80 FDR a-1 TG INT (176/601 
100 LET c-80# (a-i > 

110 FDR t-0 TO 255 
120 LET a*-"" 

130 FOR b»c TO C<S0#a)-li 
140 IF POI NT (z,b>-0 THEN LET 
a*-a*+ N N e GO TD 160 
150 LET a*-a*+"X” 

160 NEXT b 
170 PRINT 45; a 4 
130 NEXT z 

190 FOR b-i TD Ss PRINT #5 j NEX 
T b 

200 NEXT a 

220 FOR a-0 TO 255 

225 LET a*~" J< 

230 FDR b-S0*INT U76/S0Ì TQ 17 
5 

240 IF POINT (a,b>~0 THEN LET 
3^3$+" "i DO TD 260 


3 REM 


VARIABILI UBATE i 

- n=l lunghezza array da ordinare 

- a (n) -array da ordinare 

- ffi=l unghezza dello "stock" 

simulata 

» l<<n>,r<ni) - array ausiliari 

- i|j t l t r,a « variabili ausil* 

- x,w ■ var. «US. BELLO STESSO 

TIPO DEGLI ELEMENTI DI 
a<h). C DA CONVERTIRE IN 
STRINGHE SE a<n) DIVENTA 
UN ARRAV DI STRINGHE > 


5 REM 


y 


METTERE QUI 

LET n -, . . e DIM a(n 


oppure 


LET n“* . . s LET lun-...i DIM 
a$fn,lun)s DIM x$<lun)t DIM h*Q 

uni 


POI MODIFICARE LE LINEE i 
U3> 70 90 100 1 20 205 
SOLO SE 81 UBANO ARRAV DI NUM 

ERI 

10 REM ESEMPIO CON STRINGHE 
CASUALI ; per altri uei elimina 
re le linee da 10 a IH E SI3TE- 
-MARE LA LINEA 5 TOGLIENDO IL 
"REM" E SCEGLIENDO IL CASO AP- 
-PR0PR1 ATO. 


Sinqlflir C^nrpUte r - 35 


15 LET n-25f LÉT lun«10i PRINT 
"prapAruiona array'i DIM ** <n , 
lunh DIM Kl(lun): DIM n#tlun>* 
FOR i-t TO ns FOR f-1 TO lum L£ 
T a*(i ,f Ì-CHR* £ (RND*95>+32J i NE 
XT fi NEXT il FRTNT “array di pa 
rttnu i"! 00 SUB 200 
2-0 REM INIZIO 

23 DEEP . 24 , 24 s PRINT iniz 

io elaborazione 1 ' r 

25 LET m*12; Diri 1<12>J DIM r( 
12 > 

3B LET s-1: LET l Cf>*l! LET r< 
13 

40 REM inizio ciclo 1 
S0 LET 1*1 £®3: LET r*r<*3> LET 
s«*-l 

60 REM inizio ciclo 2 

70 LET Ì*la LET j-ri LET H*-a* 
UNT ( <l+r 3 S2Ì ì 

00 REM inizio ciclo 3 

90 IF a*EiK«* THEN LET i*l+l 
i □□ TO 90 

100 IF a*fj)>K* THEN LET j*J-i 
: 00 TO 100 

110 IF i>j THEN 00 TO 130 
120 LET LET a*(i)-a*< 

LET a*Cj>-H*E LET I*i+li LET 

J-j-i 

130 IF i<-j THEN 30 IO Sii REM 
■Fina ciclo 3 

140 IF i >*r THEN 00 10 160 
ISB LET »«s+lì LET l{»)-ii LÉT 
r ( a ì -r 
160 LET r*j 

170 IF l<r THEN 00 TO 60i REM 
Tina ciclo 2 

130 IF s THEN O0 TO 40s REM 
Fine ciclo 1 

190 PRINT M array final#; "s 00 
SUB 200 
195 STOP 

200 REM VISUALIZZAZIONE ARRAY 
205 BEÉF FOR f-1 TO n* P 

RI NT f»a$(f>! NEXT f; RETURN 


1 REM 


[ 

! QUICKSORT 

i di Fabio Berno. 

I 


3 REM 


VARIABILI USATE 1 

- n^lunghezza array da ordinar# 

- a(nl*array da crdinar# 

- m- lunghezza dallo "stack“ 

eiaculato 

*- 1 CnO ,r (fu) ■ array ausiliari 

- l v J T l,r,B m variabili anali. 

- k,m - var. ama. DELLO STESSO 

TIPO DEGLI ELEMENTI DI 
alni. < DA CONVERTIRE IN 
STRINGHE SE a<n) DIVENTA 
UN ARRAY DI STRINGHE 3 


S REM 


METTERE BUI 

LET n *. . » i DIM a <n 

appura 


LET n** i * i LET lun*. . . i DIM 
a*ln,lun); DlM x*(lun>i DIM w* il 
un 3 

POI MODIFICARE LE LINEE ; 

<153 70 90 100 120 205 
SOLO SE SI USANO ARRAY DI NUM 

ERI 

15 LET n~25i PRINT “preparasi et 
n# array"! DIM a(n»E FOR i-1 TO 
na LET a fi > = INT E ERND*9500) ) s NE 
XT i; PRINT “array di partenza i 
00 SUB 200 

20 REM INIZIO 

23 BÉÉP * 24,24; PRINT iniz 

io elaborazione 11 " ' 

25 LET m*±l2i DIM 1(12 >i DlM ri 
123 

30 LET *-l( LET lU>*lt LET rC 
13 -n 

40 REM inìzio ciclo 1 

50 LET 1*1 Cai i LET r-r(a)i LET 

*•■-1 

60 REM inizio ciclo 2 

70 LET i-1; LEI J-r: LET x-aCZ 
NT m+r)/2>> 

00 REM inizio ciclo 3 

90 IF i(iKx THEN LET i-i+li 
GQ TO 90 

100 IF a < j > >x THEN LET j-J~ls 
30 TO 100 

Ì10 IF i>j THEN 30 TO 130 

120 LET w-a (ila LET aEi3=atiìi 
LET a<j)**; LET i-i+ls LET j»j-l 

130 IF iOj THEN 00 TO 00; REM 
fin# ciclo 3 

140 IF i >*r THEN 30 TO 160 


36 - àrtìar Computer 


150 LÉT s-s+1* LET K*>-ii LET 
r <s )^r 
160 LET r-j 

170 IF Hr THEN SO TO 60: REM 
fin* ciclo 2 

1BB 1F m THEN 00 T0 405 REM 
Fin» ciclo 1 

190 PRINT "array final ai tì i BQ 
SUB 200 
195 STOP 

200 REM VISUAL I ZZ AZ IONE ARRAV 
205 DEEP .E,U: FOR f-1 TO n* P 
RINT *,»£*>■ NEXT +: RETURN 


READ /DATA 
per ZX81 


l REM INSERITE IN QUESTA 

. , , , LINEA 132 SPAZI □ 
..x. CARATTERI 
10 LET RE3TQRE-16514 
20 LET RE AD- 1 6583 
30 RAND USR RE3T0RE 
40 DIM A £22) 

50 FOR X«1 TO 22 
60 LET A £ X > — L3SR READ 
70 PRINT Am, 

B0 NEXT X 

90 REM 123,6,11,6,34.17,12*19, 
93,45 ,176,23,51, 18,2,84,31, 16,41 
,31 ,11,6 

100 REM 

110 REM AVVERTENZE! 

120 REM 

130 REM UNA VOLTA SCRITTA LA 
LINEA REM INIZIALE, 

DATE 

POKE 16510,0 
E NON EDITATE MAI LA 
LINEA DOPO AVERVI TRA- 
SFERITO IL LINGUAGGIO 
MACCHINA 


150 REM PRIMA DI USARE "READ 11 
USATE SEMPRE "RESTORE" 


170 REM IL PROGRAMMA FUNZIONA 
SOLO CON INTERI FQSIT. 


190 REM LE LINEE "DATA" SONO 

REM CHE DEVONO INIZIA- 
RE CON UNO SPAZIO IN 
INVERSE 


210 REM ALLA FINE DEL PROGRAM- 
MA BISOGNA SEMPRE MET- 
TERE UN REM STOP 


MACCHINA CON LE ISTRU- 
ZIONI CHE SEGUONO 


140 

REM 

150 

REM 

160 

REM 

170 

REM 

1S0 

REM 

190 

REM 

200 

REM 

210 

REM 

1000 

REM 

1010 

REM 


1020 FOR F- 1651 4 TO 1*643 

1030 INPUT I 

1040 SCROLL 

1050 POKE F,I 

1060 PRINT F , PEEK F 

1070 NEXT F 

9999 REM STOP 


16514 

42 

12 

64 

43 

43 

126 

16320 

254 

227 

32 

13 

43 

126 

16526 

254 

234 

32 

7 

30 

0 

16332 

33 

124 

64 

24 

19 

1 

1 6538 

1 

0 

24 

8 

1 

2 

16544 

0 

24 

3 

1 

3 

0 

16550 

62 

13 

50 

0 

64 

201 

16556 

33 

126 

234 

234 

32 

250 

16562 

35 

126 

254 

227 

40 

230 

16568 

254 

12S 

32 

241 

35 

126 

16574 

254 

118 

40 

233 

43 

34 

16500 

123 

64 

203 

19 

20G 

1 

16586 

0 

0 

30 

253 

42 

123 

16592 

64 

126 

254 

118 

40 

213 

16SSS 

42 

123 

64 

35 

34 

123 

16604 

64 

126 

254 

11B 

200 

254 

16610 

26 

200 

214 

28 

111 

203 

16616 

39 

56 

1S4 

123 

214 

10 

16622 

203 

39 

48 

177 

33 

0 

16628 

203 

33 

203 

16 

9 

203 

16634 

33 

203 

16 

203 

33 

203 

16640 

16 

9 

68 

77 

24 

20G 


10 REM *** BUBBLE-SORT *** 

20 REM 

30 REM Dato 1 'array a(n), con 
n Qualsiasi 
35 FOR j-1 TO n 
40 POR i-j+i TO n 
50 IP -(j)<t(i) THEN GQ TO 70 
60 LET auK-a£iJ: LET a<iì=a£j> 
: LET a £ j Xìux 
70 NEXT i 
75 NEXT j 


Travi continue 

1 REM programma "newconfas ,r 

2 REM autore D. Sabotano 

3 REM Pompei V.M. 27/U/19B4 

4 REM *** *********** ***##*#+* 

5 REM se si pref ertacene *5tam 
pe su carta, al tarare tutte le is 
Eruzioni PRINT in LPRIMr.Si crons 
iglia firn di non alterare minima 
mente NESSUNA altra istruzione i 
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n quanto il programma fa larga u 
id di variabili di contrailo del 
diagramma di flusso 

6 FOKE 23609,1501 C LS 

7 LET v*»" pp j LET a*-""* LEI e 

B LET b$=* " H : LET x$~' ipp 

9 GO SUe 7200 * REM presentai. 

10 LET *»0~0i LET »*l-0 

20 FRI NT AT 20,0! FLASH 1; J, R£S 
FONDI ALLE SEGUÈNTI DOMANDE" i PA 
USE 1001 OLE 

22 INPUT "NUMERO DI CAMPATE ?* 
" 9 ne 

23 IF nc-1 THEN PRiNT FLASH 

1 ; " LA TRAVE NON E IPERSTAT I CA, « 
i PRiNT i PRINT ÉRIGHT t;"lL PR 
QGRAMMA RIGUARDA SOLO TRAVI SU P 
ILI J DI 2 APPOGGI J 'i PRINT i PRINT 
i PRINT PAPER 6; "ELABORAZIONE I 
NTERRUTTA": STOP 


25 

REM 


2B 

DIM 

H tne) 

29 

DUI 

Mfnc+1 > 

30 

DIM 

I Ine) 

31 

DIM 

Ttnc> 

32 

DIM 

Pine) 

33 

IF nc-2 THEN GO TO 100 

34 

DIM 

EInc“l t nc-l> 

36 

DIM 

B Cne-l f 1 ) 

38 

DIM 

F tnc" 1 ) 

40 

DIM 

Ctnc-1) 

42 

DIM 

L tne-1 ) 

44 

DIM 

S (nt“i > 

100 

REM 

ri empi m. vettori ******* 

110 

FOR 

i “ 1 TO nc 

120 

PRINT AT 20,0; "LUNGHEZZA CA 


MFATA “ | i i "™ ? (cmì pr 
130 INPUT h (i > 

135 CLS i PAUSE 20 
150 NEXT i 

200 PRINT AT 13,0; "INERZIE CAMP 
ATE UGUALI? issi /no) "s PRINT AT 14 

• 

11 s INPUT u$: CLS * IF u*<>"eì" 
AND ùlO^no" THEN GO TO 200 
207 £F THEN FOR 1*1 TO 

nc: LET ÌU)“150i NEXT is GP TO 

300 

210 FOR i»l TO nc 
220 PRINT AT 20,0; " INERZIA UAttP 
ATA M s 1 1 <h KTCcdTM)" 

230 INPUT i (i > 

235 CLS i PAUSE 20 
250 NEXT i 
310 FOR i»l TO nc 
320 PRINT AT 20, 0] "CARICO CAMPA 
TA "sii" «7<Kg/m> " 


330 INPUT ptiì E LET p(i>-p<il/l 

00 

335 CLS i PAUSE 20 
350 NEXT i 

510 IF v*= j| 5i" AND a$="nn" THEN 
GU TO 545 

515 IF v*="ai" AND a^^si " THEN 
GQ TO 540 

520 PRINT AT 14,0f M c'e' «balzo 
a sinÌ6tri' > (si/'nol "i PRINT AT 15 

.*8 _ 

_ 530 INPUF a*; CLS 

531 IF «*< > -‘«ti 11 AND *♦<>'■ no" TH 
ÈN GO TO 520 

532 IF a*- 14 no" THEN GO TO 550 
535 IF a** "si" THEN INPUT "LUN 

SMEZZA SBALZO SINISTRO? (un) «*"; 

hs. 

540 INPUT "CARICO SBALZO SINIST 
RO?=CKg/m> LET ps-ps/100 

; INPUT "FURZA CONCÈNTR . ESTREMI T 
A ' (Kg) = IJ ;fs 

545 IF v*-"»i pl AND b*-"nQ" THEN 
GO TO 600 

547 IF v*-"*!" AND b^si" THEN 
GO TO 570 

550 PRINT AT e sbalza 

a destra? (si /no) "i PRINT AT 15,0 

* 56fiT I NPÙT^biìTCLB ™’™ 

561 IF b*< >"*a " AND b*^>"nD" TH 
EN 00 TP 550 

562 IF b*“"fìQ" THEN GO TO 600 
565 IF b*="5Ì" THEN INPUT "LUN 

SMEZZA SBALZO DESTRO?- (cm> 

hd 

570 INPUT "CARICO SBALZI) DESTRO 
?- (Kg/m> *" ;pd: LET pd*pd/100 
t INPUT "FORZA CONO, ESTREMITÀ r =- { 
Kgl 

600 PAUSE 50i PRINT AT 14,0; "VU 
01 CONTROLLARE? (&i /noi 11 ; PRINT A 
T 15,0J" 

ip i INPUT c*: CLS t IF c *«“no" TH 
EN GO TO 751 

603 IF c#O r 'si J ' AND cÌO"no" TH 
EN GO TO 600 

605 REM control H +*-****#****#*# 
607 CLS 

610 PRINT "CONTROLLO DATI" 

620 PRINT " 

630 PRINT 
640 FQR i~l TO nc 
650 PRINT PAPER 6; "lunghe* 4 c 
ampat* " ; i ; 11 ™> 1! ;h li ) ; "cffl" 

660 PRINT' PAPER 5j "carico camp 
ata "li; 1 ' «" | p £i > #100j "Kg/m 11 
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64 1 IF u*^si" THEN PRINT PAR 
ER 3j INK 7* "inerzia campata"; i ; 

SD TQ 680 

670 PRINT PAPER 3; INk 1\ "in*r 
zi* campita "(lì 11 - J ';l (il * "eir v 4" 
6G0 PRINT 
690 NEXT 1 

700 1F THEN PRINT PAR 

ER 6; (1 iunqheiitì sbalzo sinistro® 
l, ?ha 5 ' f [ .m ll i PRINT PAPER Sj-'cari 
co sbalzo sinistro* " ;pa*100; "Kg 
/ri" i PRINT PAPER 3; INK 7 ; "fora 
* d ' estremo*' 1 j f s; "Kg 1 * 

710 PRINT 

720 IF b$= "si " THEN PRINT PAP 
ER 6; " i unghezza sbalzo destro* " 
|hd| H cffl»i PRINT PAPER 5 -, "carico 
sbalzo destro® rJ j pd#100 ; "Kg/flt" ì 
PFVIN 1 PAPER 3j INK 7? J, +orz* d 1 
e^tr eflio=‘' ;fd; "Kg 11 
730 FRINÌ 
735 FLASH 0 

740 PRINT PAPER 6; FLASH I; 11 VU 
01 RIVEDERE? (si /nu) " i BRIGHI 0: 
FLASH 0 

750 INPUT d*s IF d#<>"Si M ANJJ d 
t<>‘'na 1 ' THEN SD TO 750! IF d$=" 
Si " THEN GO TO 605 
760 CLG 

770 IF THEN GO TQ btàm 

772 FOR i = l TO 7i PRINT FLASH 
l ; GFÌIGHT lj PAPER ij" 

"7 - Nt:xT - I7~ 
PRINT ì PRINT PRINT FLASH 1 \ (l 
PLEASE W A 1 T “ 

775 SO SUB 9000 

784 IF s$® r, ok" THEN GO TO 784 

785 IP u*“"no” THEN GO SUB 990 


770 IF r»c -2 THEN 00 TÙ 0000 
000 REM generai . coe-H . ****#+*-»* 
010 POR k=2 TO nc-2 
820 LET e(k,k-l>®h(k) /(6*i (ki J 
S30 LET e<k,k>*h(k>/<3*i <k) >+h( 
k+iì / (3*i <k+n ) 

040 LET e(k T k#U«h(k + n /(6*1 (k+ 
lì > 

350 LET b(k, ii =p (k>*h (k>^3/ <24* 
i £ k n +p t k+ 1 ) *h < k + 1 > "-3/ ( 24# i t k+ 1 > 
) 

B60 NEXT k 

870 LET e(i,il-hli) / (3*i ( I H +h < 
2Ì /(3*i (2 > > 


0S0 LEI e(l,2J wh(2?/<£»#i E2> ) 

□85 IF a*<> "ti 1 ' THEN LE f ps®Bi 
LET hs=0: LET 4s-f3 
B90 LET b (i t l)=p(l)*h (1> "3/124* 
i ili )+p(2)*h(2)'Z/ (24#i (2) )-ps*h 


s* 2 *h < 1 ) / U 2 *i un-fi#h»»haì/(6 

# i £ i ) ì 

700 LET e Tnq“l ,nc-2) -h tnc-I) / (6 
*i (nc-i> 1 

710 LEI e (ne-1 ,nc~i) »h (nc“l> / <3 
* i (nc- 1 > > +b ( nc > / (3*i (nc ) > 

915 IF bSO’si" THEN LET pd=0: 
LET hd«0: LET Td-0 
920 LET b (nc“l f 1 ) =p (oc-li *h (no- 
li (24*i <nc-l> >+p{ne)*h CncK 3/ 
< 24*i (nc > > -pd*hd "2*h (nc ) / < 1 2*i (n 
c:n-Id*hd+h(nc>/ (ó#i (nei > 

2200 REFI sviluppi matematici**** 
2202 REM sistema CE3*00«CB] 

2230 LET n-nc-i 
2370 LET det*rm-l 
2370 FOR k*i TO n 
2430 LET pi vtit-e <k , k) 

2440 LET ik=k; LET jk«k 
2450 LET *pìvot-ABS (pivot) 

2470 FOR i-k TO n 
2480 FOR i-k TO n 
2470 IF ABS <eU r j) ) >*plvot THEN 
LET pivot^e ii * j ) : LET apivdt=A 
BS (pivot* i LET i k=i : LET jk -J 
2500 NEXT j 
2510 NEXT i 

2530 LEI c <k)“jk! LET l(ki*ik 
2570 IF ikOk THEN LEI determ=- 
detern 

25G0 IF jkOk THEN LÈI d*t ero- 
detemi 

2590 LET deter m=deterd*pi vot 
26S0 IF ik=^ THEN SO TO 2870 
2720 FOR i-l TO n 
2730 LET hold^e£ik t i ) 

2/40 LET etik,i > 

2/50 LET e(k,i i-bold 
2760 NEXT i 

2870 IF jk^k THEN GO TO 3030 
2710 FOR i-1 TQ n 
2920 LET hold-e(i t .jk) 

2930 LET eti T jk) *e(i T k> 

2940 LET a ( i , k ) “hol d 
2750 NEXT i 
3030 FOR i-I TO n 
3040 LEI s( i J^a(i ,kì 
3050 LET e (i *k i *0 
3040 NEXT i 

3080 LET s(k)B0t LET *(k 1 k)*l 

3130 FOR i=i TO n 

3140 LET e(k f i )«e(k,i >/pi vot 

3130 NEXT i 

3260 PUR j-1 TO n 

3270 IF j« k THEN GO TO 3440 

3310 FOR i-1 TO fi 

3320 LET e ( j t i ) »e ( j , i 1 -s ( j ) *e Ck , 

1 ) 
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3330 NEXT i 
3440 NEXT J 
3400 NEXT k 

3370 POR i-n TO I STEP -1 

3500 LEI ik~c<i) 

3590 IF ik-i THEJM 00 10 300C 
3630 FOR j-1 TO n 
3640 LET huì d“# i i t j ) 

3650 LET B(i t J)-*(ik,j) 

3660 LET éUk,j>-hold 
3670 NEXT j 
3000 NEXT i 

3040 FOR i-n TO 1 STEP -l 

3030 LET j|c-l < J> 

3060 IF Jk-j THEN (30 TO 3960 
3900 FOR TD n 

3910 LET hold-*(i f j> 

3920 LET 

3930 LET • <( * jkl-hoid 
3940 NEXT i 
3960 NEXT j 

3965 REM N, fi, ora INV CÉl-ttg 

3966 REM pr ad. **tri c, IF 3 -LE 3# IBI 
4500 FOR 1*1 TO n 

4510 LET f tt)-0 

4520 FOR r-1 (□ n 

4530 LET f l i ) «f l i 1 +e C i ,r > *ti < r , 1 > 

4540 NEXT r 

4550 NEXT i 

5000 REM end «viluppi matematici 
6000 REM moiri * «gli appoggi****** 
6010 LEI mll>— p»*H*^2/2-f**h* 
*020 LET jnlnc+lJ— pd#hd~272-fd*h 
d 

6030 FOR i-2 TO nc 
6040 LET rtt<U — 4(1-1) 

6050 NEXT i 

60*0 REM tagli ntr * sin. camp, #* 
6070 FOR i-l TO nc 
6000 LET ili )-(»( 

+f»(l >«frU>/2 
*090 NEXT i 

6095 OC SUB 75001 REM «cala 
6100 REM matrici* f 
61 L0 LET nab- l***”si H i +{bt* M mi "1 
6115 IF THEN SO Sufi 0500 

61 19 IF v*='*i “ THEN (30 TO 6111 
6120 DIM Z(22 t nc+n*b> 

6130 FOR j-1 TO nc 

6135 LET zi -0| LET di-B 

6140 LET zz»'h t j 1 710 

6150 LEI dz-MljÌ/10 

6160 FOR i-1 TO U 

6170 LET zz-rz*dz 

6160 LET m=m t j ì *t < j )*»-( (p ( j > 72 

> *zz"2> 

6190 IF m>-0 AND *i>z(i,j> THEN 
LET z li « j > -m 


6200 IF «KB AND (lt<c(Ì+n,J) THEN 
LET z(i*ll t j)-m 
6210 NEXT i 
6220 NEXT j 

6230 IF a*= "nq" THEN 60 TO 6300 

6240 LET iz*- ha/10 

6250 LET dl-tn/10 

6260 FOR i-1 TO 11 

6270 LET zz —z z +dz 

6200 LET hi* (m< 11 7h*ì *u 

6290 IF m>^0 AND m>z{i t nc+ll THE 

N LET z U v nc+i i -m 

6292 IF (1K0 AND *<z <1 +11 p nc*-ll T 

HEN LET z(i+ll t nc+lJ 3 i 

6300 NEXT i 

6305 IF t»**“fl0" THEN SO TO 6370 
6310 LET zz— hd/10 
6320 LET pz-hd/10 
6330 FOR i=l TO H 
6340 LET zz-zz+dE 
6350 LET i(5= (m (rtc+I ì /hdi «Htid-tz J 
6360 IF m > - 0 AND m>z (i ,nc+n»b) T 
HEN LET z (i ,nc+nib) -n 
6362 IF «<0 AND «k z { i + l 1 , i>t:*n*b > 
THEN LET z ti +1 1 ,tic+nsbf*m 
6370 NEXT i 
6375 CLS 

63 7 B PRINT PAPER 6| "CALCOLO CON 
CLUSQi " i PRINT 

6379 I F M d" THEN PRINT PAPE 
R 6n h LA CONDIZIONE DI CARICO A 
SSEGNA FA E STAVA ANALIZZATA ED E 

STA T OCALCOLAT Q IL DIAGRAMMA DEL 
MOMENTO "i PAUSE 50: PRINT AT 19 
,0[ FLASH 1; “premi un tasto per 
continuare" i PAUSE 0; 00 TO 7000 

6380 PRINT BR1QHT 1; "LA CONDÌ ZI 
ONE DI CARICO ASSEGNATA E STATA 

ANALIZZATA £0 E ' STATO ARCHIVI 
ATO IL SUO CONTRIBUTO ALLA FASCI 
A" 

6390 PAUSE 100 

6400 PRINT AI 1 4 1 0{ FLASH ir 1 alt 
ra condì z . di cari co? lai 7 adì 1 ' 

6410 INPUT v*i CLB 

6415 IF v*O"0Ì“ AND v*t>"no w TH 

EN 80 TO 63 70 

6420 (F " THEN 60 TO 310 

7000 REM stampa fascia mota, ***** 

7001 PRINT j PRINT i CLS 

7002 PRINT " ... 


7003 ’lF~tÌ-“d ' THEN PRINT 11 DI 
AGP AMPIA DEL MOMENTO (Kg*cml ,, i GO 
TO 700* 

7004 PRJNT - FASCIA MOMÉNTI 
fKg*cnO n 
7006 FRINÌ ' . 


700S PRINT ! PRINT 

7010 FOR TQ nc 

7020 PRINT "CAMPATA NUMERO ";j 

7030 PRINT 

7040 FOR i-1 TO' li 

7050 PRINT BRIGHI 1 j "s*" ; I NT (( 

h< jj /10> *i-h(j) 7Ì0> ( " + IN 

T MÌ->-*jlNT (iU+11 

7060 NEXT 1 
7065 FRINÌ 
7070 NETT j 

7000 IF ■*»"«□* THEN 00 TO 7135 
7090 PRINT ■■ SBALZO SINISTRO " 

7100 PRINT " 

7110 FOR i-l TO 11 

7120 PRINT BRIGHI lr'i-^plNT (< 

h»Z10>#i~h*/10> ; " M INI ix 

U t nc+U>| M M(->-";INT tzti+ii, 

nc+I> j 

7130 NEXT i 

7135 IF b «-' no" THEN 60 TO 7100 
7140 PRINT "SBALZO CESTRO 
715$ PRINT 

7 1 m FOR i = 1 TO’"! 1 ”™ 

7170 PRINT BRIGHT Ip'’z-“;1NT <( 

hd/10> +i-hd/10> ; " M (+>-"; IN 

T iz i i ,nc+nsbJ i ; " M INI ( z 

ti +1 1 ,nc+nsb > ì 

7100 NEXT i 

7190 PRINT ; PRINT 

7192 PRINT PAPER 65 “vuoi rivede 
rs (si /no) “ 

7193 INPUT m* 

7194 IF n* ANO m®< >"nq M IH 
EN GO TQ 7193 

7195 IF THEN 60 TO 7000 

7196 PRINT : PRINT 

7197 ELS : SO TO 7600 
7196 STOP 

7200 REM subrout, , preientaz . #*-#* 
7204 POR 1=1 TO 2: PLOT 0, 16B-Ì : 

DPAW 255,01 NEXT i 
7206 POR 1=0 TO 3; PLOT 25+64*1, 
130£ DRAN 6 , 0 e DRAW -3,6* DRAW - 
3,-6: NEXT 1 

7210 PRINT AT 0,0; PAPER 6* "prag 
raduna jcanfas ; AVVERTENZE " 

7215 PAUSE 100 

7220 PRINT AT 4*0; BRJSHT Ij’IL 
PROGRAMMA CALCOLA LA FASCIA DEI 
MOMENTI PER TRAVI CONTINUE SU 
PIU' AFPCI00 1 SOGGETTE A 5TESEUNI 
FORMI DI CARICO SULLE CAMPA TEE S 
USLI EVENTUALI SBALZI.' 1 
7225 PAUSE 100; PRINT 
7230 PRINT PAPER 5; “E PRÒ VIS fA 


LA POSSIBILITÀ DI CARICHI CONCE 
NTRATI IN ESTREMITÀ ' DI SBALZO E 
CHE LE CAMPATE POSSANO AVERE IN 
ERZIE DISUGUALI. IL MODULO ELAST I 
CO INVECE E r ASSUNTO COSTANTE 1 ’ 
7240 PAUSE 1501 PRINT AT 19,0; F 
LASH I; "premi un taata per conti 
nuare"* PAUSE 0 

7250 FOR i-1 TO I0ì PRINT AT 9+t 
,0;- 

n i PAUSE Si NEXT i 
7260 PRINT PAPER 6;AT 10,0; BRI 
SHT i| “N. B. per Tascia si intende 
quel dominio del piena in cui, 
i diagrammi del momento relativ 
i a tutte le eonfigur azioni di 
carico assegnate, sono cer t amen 
te compresi “ 

7263 PAUSE 100 

7265 PRINT AT 20, 0; FLASH 1} Ve 
mi un tasto per continuare' 1 ; PAU 
SE 0 

7267 FOR i-0 TO 21; PRINT AT 1,0 

<f i PAUSE 2: NEXT il CL5 
7269 PRINT PAPER 6? "PREFERISCI 
CHE TI SIANO CONSEGNATI S IMBOLAR 
MENTE I DIAGRAMMI CORRISPONDENTI 
A OGNI CONDIZIONE DI CARICO Q 
LA FASCIA CONTINUAMENTE AGGIORNA 
TA ?" 

7271 PRINT AT 6,0; BRIGHI l;"d"i 
PRINT AT 6,2; "per ottenere i di 
agrammi " 

7273 PRINT AT 0,0; BRIGHI l;"f fl ; 
PRINT AT S,2; M per ottenere la f 

ascia" 

7274 INPUT t* 

727E IF t*< > li -f 11 AND t*<>"d" THEN 
SO TD 7274 

7280 FOR i-B TO 21; PRINT AT i ,0 

J " 

PAUSE 2; NEXT i; CLS 
7310 PRINT BRIGHT 1 ; "NUMERA GLI 
APPOGGI E LE CAMPATE COME E r MO 
STRATO NEL SEGUENTE ESEMPIO 1 ’ 
7315 FOR i*l TU 2 
7320 PLOT 0 , 90— i ; DRAW 255,0 
7330 NEXT i 
7335 POR TQ 3 
7340 PLOT 25+64*i,61; DRAN 6, Se 
DRAW -3,6l DRAW -3,-6 
7345 NEXT i 

7350 PRINT FLASH 1;AT 12,3; "1"; 
AT 12,11 ; “2" ;AT 1 2 , 19 ; "'3 " ; AT 12, 
27; " 4 h ; PAUSE 40 
7360 PRINT BRIGHT i;AT 11,7: "i" 
;AT 11,15; " 2” ; AT 11,24; if 3" 
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737 0 PRINT AT 16,0» FLASH t|“ 
FLASH 0; "-nuaaraz , Appoggi . 11 1 AT 1 
0,0? BRIGHI 1[“ "I BRIBHT af"-nu 
minz . campa tv" 

73S0 PAUSE 100$ PRINT AT 20,0» F 
L ASH 1; “premi un tuta per conti 
nuére-i PAUSE 0$ CLS 
7390 RETURN 

7500 REM *ubrout.*c*l ****** •**# 
7510 FOR i-1 TO nc+1 
7520 IF ÀB& THEN LET * 

ci-ABS nU ) i LET ise0*ADS m<i> 
7530 NEXT i 

7540 FOR i*l TO nc 

7541 LET asl-ABS (p ( i ì *h Ci *~2/8I 

7542 1F **l>**0 THEN LET icl-lt 
le LET «sB-ul 

7543 NEXT i 
7560 RETURN 

7600 REM rappr . gr *4 *Faec » ******* 
7605 PRINT BRIGHI 1 | “ ISTOGRAMMA 
RISULTATI 01 CALCOLO * 

7610 LET nd-ll#<nc+n*b> 

7612 LEI rr— (6 B/kU 

7615 LET ds*235/nd 

7616 PLOT 0,1001 DRAW 253*0 

7617 IF a^ H nù" THEN SO TD 7660 
7630 FOR i*l TQ 10 

7640 PLOT d«*<i-U , 1001 DRfìhl 0,* 
1 1 ,nc+t ì *rr 

7650 PLOT de* ti -li, 100; DRAW 0,z 

< 1 + 11 ,nc+l ì *rr 

7660 NEXT ì 

7670 LET uu-<A*-'*t") 

76B0 FOR j=l TO nc 

76G5 FDR i*l TO 10 

7690 PLOT £d»M n*uu+da*U-n + (j 

-lì* (ds*l 1 ) , 1001 DRAW 0 , i £ i 

r 

7700 PLOT td»*l 1 J •uu+d** ti -1 ) + ( j 
-IHHdvftll) , 1001 DRAW 0,1 <1 + 11, j 

) *rr 

7710 NEKT i 
7720 NEXT j 

7730 1F THEN 80 TQ 7780 

7740 LET uuu«ne*d**l l*uu*de*l 1 
7750 FOR i-1 TO 10 
7760 PLOT uuu+d»4<l-il , 180< DRAW 
0,i 1 1 1 nc+nib 1 #rr 

7770 PLOT uuu+di# ( i -1 > , 100 i DRAW 

0 , z £ i + J l ,nc+n»b) *rr 
7780 NEXT i 

7782 PAUSE 75$ FRJNT AT 19,0» PA 
PER 6; "OPZIONI FINALI" 

7784 PR1NT AT 17,0j BRI EH T i|" r 
PER RIVEDERE I RISULTAT I * J AT 1B 
,0» BRIQHT li* « PER ULTERIORI C 
END* DE CARICO" i PRENT AT 19,0» B 

*3 ■ UndfMr Cprpftr 


RISHT ij" u PER USCIRE DAL PROSA 
Am a- 


77Q5 INPUT l*i IF 1*<>V M AND 1* 
<>"41" AND 1*0»%» THEN SO TO 77 
SS 

7706 IF l*-"r“ THEN GO TQ 7000 

7707 IF l*-*u H THEN 00 TO 7V00 
7788 IF 1*-“»” THEN LET v*»“el n 
i CLS ì 80 TG 310 

7900 CLS i STOP 

8000 REM cavo nc- 2 ************* 
0005 IF a*- “no" THEN LET a«*0e 
SD TO 8015 

8010 LET si* -p a*h»^2 /2+f a *h * 

0015 IF b*- N no* ! THEN LET md- 0 ; 
00 TO 8830 

0020 LET ad-pd*hd~2/2+fd*hd 
8030 LET c0-hU)/t3tÌ(l))tIi(2)/t 
3*1 <2> ì 

0040 LET cl-p<n*h(U A 3/ <24*i (li 
> +p (2 > *h ( 2? A 3/ < 24* i <21 > 

8050 LET t2-ee#htn/<6*i (Il ) +»d* 
h< 2ì/t6*i (2>> 

8860 LET mlU— ee 
BB70 LET <*<3i*-ed 
8080 LET A £2 1 - < c2-c 1 1 /c0 
8090 GO TO 6060 

049? REM ai ter amento [Z]****#** 
8500 DIM t (22 f nc+neb) 

8310 RETURN 


9000 REM subrout e*c l u3i on i ***** 
9010 FOR i-1 TO nc 
9020 IF i ti)>0 THEN SO TO 9600 
9030 IF hUX-0 THEN SO TQ 9580 
904O NEXT i 

9045 IF à*-'no“ THEN OD TO 9055 
9050 IF ha<-0 THEN QQ TO 9500 
9055 IF W- B n4“ THEN 50 TO 9070 
9060 IF hd<.-0 THEN SO TO 9500 
9870 RETURN 

9308 CLS : FRI NT FLASH 1| U ELA0O 

RAZIONE INTERROTTA": PRINT AT 3, 

0» PAPER 6| "hai inserito un* iun 

ghe2zaO0 ,k t 80 TO 9S00 

9600 CLS : PRINT FLASH lf "ELABQ 

RAZIONE INTERROTTA": PRINT AT 3, 

01 PAPER 6» “hai inferito un inir 

zia 08" i SO TO 9900 

9800 PAUSE 50i PRINT AT 19,0f 8R 

IOHT 1» "premi un tasto per conti 

nuara'i PAUSE Ui CLS : RUN 1 


REM luhrout . a empii 4 ic » ***** 
9910 LET ioia-100 
9920 FOR i-1 TO nc 
9930 IF ìU)Hm THEN LET ie»-i 

<i 1 

9940 NEXT i 

9930 FOR i-i TD nc 


LET 1 


9960 LET i fi ì-i ti >/imm 
9970 NEXT i 
9975 LET 
9900 RETURN 


Tape-test 


0>REM 4 * ** ******* * ******** «-4-# 

0>REM ****** TAPE TEST ****** 

0>REM ** ? Luigi Cai legar i ** 

0>RÉM * V 3.0 *SP48K# 12/04 * 

0>REM #**#********#*******#*# 
1300 PQKE 23693, 3 i INK 9 
1350 PQKE 23659,22: CLEAR 59999 
1400 PQKE 23658,3: 80 SUB 6700 
1450 RESTQRE 6000: SQ SUB 5430 
1500 SD SUB 46002 GO SUB 5450 
1550 SO SUB 5000: SO SUB 5450 
1600 m SUB 1300: PAUSE 0i RIM 

1650 REM 

1700 REM — CALCOLI — 

1750 REM 

1800 PRINT #0 ; T AB 3$ FLASH Ij"CA 
LC0L2 IN CORSO" 

1350 BORDER 2 

1900 DIM a {256) : LET t«l 

1950 LET ni-le38: LET ma— 1 

2000 LET me=0; LET sd^0 

2050 POR j=ò 1 000 TO 61511 STEP 2 

2100 LET b=PEEK J+236*PEEK (1+1) 

2150 LET a fi) “b s LET i-i + 1 

2200 1F b >ma THEN LET ma-b 

2250 1F b<ni THEN LET mi«b 

2300 LET me=it.e+b: NEXT j 

2330 LET me~nì*/256 

2400 LET c* (inaimi ) /103; CLS 

2450 REM 

2500 REM TRACCIA GRAFICO 

2550 REM 

2600 BORDER 5 

2650 PRINT AT 0,11? INVERSE lj "T 
APE TEST 1 ' 

2700 PLOT 0,56: DRAW INK 5,255, 
0 

2750 PLOT 0,159: DRAW INK 5,235 
,0 

2000 FOR j*0 TO 255i PLOT j,56 
2050 LET b=atj+l) 

2900 DRAW INK 6,0,fb-mi>/c 
2950 LET sd^$d+(ABS (b-**) ) A 2 
3000 NEXT ji LET ad-INT t ad/256 > 

3050 REM 

3100 REM — STAMPA RISULTATI — 

3150 REM — 

3200 PRINT AT 15,0j "Madia cappio 


riamanti» "$INT me 

3250 PRINT '"Deviazione Standard 

* M ;sd 

3300 PRINT ' "Minimo - " S mi t 
3350 PRINT "Massimo ■ "jraa 
3400 PRINT ' INK 6 S "Giudizio : " 

3450 QO SUB 3700; COPY 

3500 PAUSE 20: BORDER U RETURN 

3550 REM 

3600 REM — FORMULA GIUDIZIO — 

3650 REM — 

3700 RESTORE 3950 

3750 FOR j*l TO 10; READ a, a* 

3300 IF a>ad THEN 00 TO 3900 

3850 NEXT j 

3900 PRINT a$: RETURN 

3950 DATA 015, "Otti rao" 

4000 DATA 030, "Eccellente" 

4050 DATA 060 /Molto buono" 

4100 DATA 085, "Buono" 

4150 DATA 140, 'Discreto" 

4200 DATA 240, "Mediocre" 

4250 DATA 330, “Su# fi ci ente' 1 
4300 DATA 350, "Insufficiente" 
4350 DATA 390, "Scarso" 

4400 DATA 420, ,r Molto «carso" 

4450 REH 

4500 REM INCISIONE NOTA 

4350 REM 

4600 PAUSE 1: LET a$=INKEY4 
4650 1F a*<>"M" THEN SD TO 4600 
4700 PRINT #0j TAB 1; FLASH 1;"N0 
TA CAMPIONE IN INCISIONE ..." 
4750 R ANDO MI 7 E USR 60045 
4900 BORDER 6i RETURN 

4850 REM — a— 

4900 REM — CAMPIONAMENTO 

4950 REM — ■ — 

5000 PAUSE 1: LET a*-INKEY* 

5050 IF a*0"M" THEN SO TO 5000 
5100 PRINT #0;TA8 1? FLASH 1;"DI 
SITALI ZZ AZIONE IN CORSO ..." 

5150 BORDER 2 

5200 RANDQMIZE USR 60000 

5250 BORDER 5? RETURN 

5300 REM 

5350 REM - ISTRUZIONI 

5400 REM * 

5450 OLE : PRINT AT 0,Uj INVER5 
E 1 ; "TAPE TEST" ’ * 

5500 READ a* 

5550 IF a$*"_" THEN RETURN 
5600 PRINf : FOR j*l TO LEN a* 
5650 IF PEEK 236BB-1 THEN POKE 
23699, PEEK 23699-1 
5700 LET boatti) 

5750 IF b*-" " THEN PRINT b*f! 
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SO IO 5*750 

SSfiJB IF THE64 RRlWT b*i P 

AUSE 50; 60 TO 5950 
5S50 PRINT BRIGHI lj PARER 2; OH 
R* 137; CHRi 0; 

3700 DEEP 1/315,101 PRINT bfj 
3950 NEXT j: GQ TO 3500 
6000 DATA "Matti una cassetta nu 
ovì nel tuoregi stratere, stacca 
il cavetto EAR, premi PLAY St REC 
GRD per la incisi □ne." 

60S0 DATA 11 Quando la parta non m 
sgneticé dal nastro »' passata 
premi i 1 tasto li* " 

6100 DATA "Inciderò" un suono-ca 
mpione della durata di 20 ae 

condì, che pai dovrai farmi ansi 
i tiare . 1 
6150 DATA 

6200 DATA ,J OK La nota campione 
e' stata incisa*" 

6250 DAI A '“Ora ri avvolgi il n«at 
ro, coi legai 1 cavetto EAR e prem 
i PLAY per là riproduci one* " 

6300 DATA "Non appena senti arri 
vare il suono allo Spectrura p 
igia ancorai! tasta li*" 

6350 DATA 

6400 DATA "Qra ferma pure il nas 
tro* " 

6450 DATA "Tra qualche secondo t 
i mostrerò' i risultati dei miei 
calcoli . " 

6500 DATA M Ji 

6550 REM — 

6600 REM — POKE MACH INE CDDE — 

6650 REM — — — - 

6700 LET cs0: BDRDEft 2 

6730 RESTQRÉ 7100 

6800 POR J=fj0000 TO 60071 

6B50 READ ai PDKE i,a 

6900 LET c-c+à! NEXT j 

6950 IF c=9055 THEN BpRDER 3; R 

ETURN 

7000 PRINT FLASH l;"ERROREi qua 
Iche valore dei DATA contenenti 
il linguaggio macchina e r errato 


7050 LIST 7100: STOP 

7100 DATA 243,033,072,230,175,21 

1,254,71 

7150 DATA 1 97 , 001 , 000 , 000,017,22 
0,005,219 

7200 DATA 254,023,023,210,111,23 
4 219 254 

7250 DATA 023,023,218,126,234,00 
3,027,123 

7300 DATA 173, 194,110,234,113,03 


5,112,035 

7350 DATA 193,016,221,251,201,24 
3,033,064 

7400 DATA 156,062,085,006,120,00 
0,016,253 

7450 DATA 211,234,015,079,043,12 
5,180,121 

7500 DATA 194 , 147 , 234,251 , 201 , 00 
0 , 000,000 


7550 

7600 

SAVE ' 
SD TO 

'Tape 

7550 

Test 

H LINE 1300 

6 000H 

F3 


DI 


60301 

2148EE 


LD 

HL, 61000 

60004 

AF 


K.DR 

A 

00305 

D3FE 


OUT 

(#FÉ) ,A 

60097 

47 


LD 

M 

60000 

C5 

LEA60 

PU3H 

BC 

60094 

910900 


LD 

BC ,09000 

60012 

11DC95 


LD 

DE, 01 500 

60015 

DBFE 

LEA6F 

IN 

A, (#F£1 

60(1 7 

17 


FILA 


609 2 8 

17 


RLA 


60014 

D26FEA 


JP 

NC.LEA6F 

60922 

BBFE 

LEA76 

IN 

A, ( #FE T 

60024 

17 


RIA 


69025 

17 


RLA 


60926 

0A7EEA 


JP 

OLEATE 

69029 

03 


INC 

BC 

60030 

1B 

LEA7E 

DEC 

DE 

60031 

7B 


LD 

A,E 

60032 

92 


m 

D 

60033 

C276EA 


JP 

(Z.LEA71 

69036 

71 


LD 

tMLJ , C 

60037 

23 


INC 

HL 

60036 

7i 


LD 

4HLJ t B 

6003? 

23 


INC 

HL 

60040 

CI 


POP 

BC 

60041 

HDD 


DJ NI 

LEA68 

60043 

FÉ 


li 


60044 

C? 


SET 


60045 

F3 


DI 


60046 

2140?C 


LD 

HL , 40000 

60049 

3E55 


LD 

A, #55 

60051 

0670 

LEA?3 

LD 

6, #70 

60053 

00 

LEA 91 

NOP 


60154 

10FC- 


D J NI 

LEA95 

60056 

D3F| 


OUT 

tIFEJ , A 

60056 

0F 


ARCA 


6005? 

4F 


LD 

C , A 

69060 

2B 


DEC 

HL 

60961 

75 


LD 

A,L 

69162 

14 


OR 

H 

60063 

7? 


LD 

A,C 

60064 

C293EA 


JP 

NI, LEA? 3 

60067 

FB 


Et 


6906B 

C? 


RET 
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La soluzione dello schema stali- 
co trave continua è una dalla opera- 
zioni più (requeniemente richieste a 
chiunque si occupi di strutture; ba- 
sii pensare che il problema ricorre 
nello studio di alcuni tipi di ponte 
ed entra a. ter parte degli schemi li- 
miti di funzionamento dei più comu- 
ni solai . 

Il problema (i persi atico) è concet- 
tualmente semplice; sussista perù 
una certa laboriosità di calcolo* 
specialmente se, come spesso ac- 
cada, non ci si accontarli a dei coli 
momenti i pestatici, ma si vuol co- 
noscere, sezion a per sezione, Il mo- 
mento fletterne più sfavorevole, 
corrispondente a molteplici condi- 
zioni di carico. 

Per illustrare ■ passi logici da 
compiere per giungere alla soluzio- 
ne, consideriamo una semplice tra- 
ve continua su 4 appoggi, e sceglia- 
mo come metodo di calcolo quello 
della congruenza (noto- anche come 
metodo deile forze}. Jn lai caso, la 
prima operazióne da compiere con- 
siste nel passare dallo schema da- 
to (fig. il a uno schema isostatico 
equivalente, su cui, oltre ai carichi, 
siano evidenziate le più convenienti 
iperstaiiche equilibrale XI e X2, da 
ipotizzare con un valore qualsiasi 
incognito (fig. 2). 

Uno schema di questo tipo, in sé 
rispettoso deii’equiJitwio, non è pe- 
rò ugualmente rispettoso della con- 
gruenza. £1 avrebbe intuiti, in gene- 
rale: 


Professional 



calcolo di 
travi contìnue 


di Domenico- Sabatino 


Un software di alto livello 
su un tema classico 
di ingegneria civile 


mente passare a stadi successivi 
delia progettazione dopo aver preso 
in considerazione un'unica condi- 
zione di carico. Occorre quindi esa- 
minare aitm, con uguale criterio, e 
disegnare i relativi diagrammi. 

Esaurite le condizioni di carico 
rienute più significative o più gravo- 
se, l’utìi mo passo logico da compie- 
re consiste nell 'evidenzi are le parli 
più esserne dì tutti i diagrammi (di- 
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T~" i 1 


f BA -iO 9 BC 

9 C 6 ^ 9 Cd 

▲ 

A 

A 

deve 9 ih. è La rotazione dell'estre- 
mo i dell'asla Ik. 

A 

s 

c 

Occorre allora selezionare, nella 
duplice infinità delle i persi ali ohe 


:ci 
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equilibrate, l'unico congruente. Ta- 
le o&ietiivo si può perseguire risol- 
vendo il sistema lineare 

f B4 = ? SC 

9 B4 = 9 se 

Determinati l valori atleti ivi (equi- 
librati e congruenti) delle iperstati- 
che XI e X2. diviene possibile deter- 
minare il diagramma del momento e 
le sue derivate (tagli), in alcuni punii 
Salienti (appoggs), in modo da com 
piotare lo studio. 

Raramente però e ragionevol 


* — A 


l l I 


fig. 2 
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sagnaù uno sull astro*, in modo da 
individuare quella che si è sofìti 
chiamare fascia òsi momenti. 

* Con questa eepressicne si inten- 
de quella rappresentazione grafica 
(o analitica) che associa a ciascuna 
sezione il maggior momento positi- 
vo e il minor momento negativo, 
Una volta ohe questo sia stalo 
calcolato, si disporrà di tutto ci* 
che occorre porgli stadi successivi 
della progai tallone. 

! moderimi passi logici fin qui in- 
dividuali, opportunamente traspo- 
sti in forma Intel lag! bile ai compu- 
ter, costituiscono la base dei pro- 
gramma C0NFA5, in cui la parte 
più interessante è proprio la gene- 
razione automatica dei coefficienti 
del sistema lineare e la costruzione 
della matrice fascia , cosi organizza- 
ta: 


forza cono. sb. sin. 1ÙOO 

sbalzo a destra si 

lungh- sbalzo destro 200 

carico sb. destro 0 

forza cono. sb. destro 1000 


A questo punto è possibile rive- 
dere ì dati, prima di procedere 
nell'elaborazione, quindi il compu- 
ter stampa una maschera d'attesa? 
la lunghezze di tele attesa è variabi- 
le, in funzione dalla complessità 
della struttura: si tratta, comunque, 
'di una manciate, di secondi. 

A calcolo concluso, si incontra 
un'opzione che permette di consi- 
derare altre configurazioni di cari- 
co, Con una risposta negativa, la fa- 
scia del momenti sarà il solo dia- 
gramma relativo al carico assegna- 
to, è tale diagramma verrà conse- 
gnato con 10 ordinale per tratto. In 


valori maggiori 1 

dei valori positivi 

™ _ attuali 11^ 

valori maggiori 12 

dei valori negativi 
attuali 22 


ne nsb ^ (a $ = “sll + jbS = L, si") 

(no = numero campale; nsb enumero sbalzi). 


L'uso*del programma è eslrema- 
mente semplice e le uniche cautele 
de osservare sono legate all’inseri- 
mento -sonetto dei dati, con un'at- 
tenzione particolare alla stringhe al- 
fanumeriche. 

Proviamo per esempio a risolvere 
io schema di Mg. 3; al comando 
RUM, io Speptrum presenta il pro- 
gramma, mostra come andranno 
numerati appoggi e campate, e 
chiede I dati- Ecco gli input del caso 
in esame; 


numero di campate 3 
lungh. camp. 1 400 

lungh. camp. 2 SOc 

lungh, camp, 3 400 

inerzie tutte uguali si 

carico camp. 1 6000 

carico camp. 2 3QOO 

carico camp. 3 60OO 

sbalzo a sinistra si 

lungh. sbalzo sin. 200 

carico sbalzo Sin. 0 



particolare, nel l’esempio ipotizzato- 
risulta; 

roomerno all' appoco 1 = -20COCC >;- 5 .'-cm 
rmomenlfl all' appoggia 2 = -N75BOT fcgiliim 
momanlci tìH'apìiù^fiVù 3 = -1 dTSDOO Strani 
Nionfr'ilu al raptiOy^-ij. i = -200000 k-g-.tm 

VI sarà... facile verificare (ma- 
nualmente) la correttezza dei risul- 
tali. Rifiutando di rividero I risultati, 
viene ora prodotto un istogramma, 
che fornisce una visualizzazione ef- 
ficace delie risultanze del calcolo, e 
un menu finale. 

Note: la routine dalla linea 2200 a 
4550 non è totalmente originale, es- 
sendo stata "tradotta” e adattata 
da un software pubblicato in un vo- 
lume di programmi matematici (si 
tratta di un metodo di soluzione di 
sistemi lineari molto efficiente e 
isol abile dal resto del programma). 

Mediante CONFAS è possibile ri- 
solvere anche travi caricate negati- 
vamente, con campate compieta- 
mente scariche, con inerzie disu- 
guali, eie. 


Che cosa 
riuscite 
a fare in 
una riga? 

Non importa che cosa fac 1 
eia, basta che funzioni e che 
sia divertente. 

Deve essere solo In basic, 
quindi non è permesso Tubo di 
USR; sono ammesse le 
POKEJPEEK, se relative a varia- 
bili di sistema. 

Ogni mese pubblicheremo II 
programma, a giudizio della re- 
dazione, più originale e diver- 
tente. 

Di seguito trovate un esem- 
plo (niente di speciale, ma,,, 
non vogliamo togliervi la possi- 
bilità!). 

Data la brevità dei program- 
mi, siala esentali dalia casset- 
ta, purché il listato eia prodotto 
dalle stampante o comunque 
trascritto con la massima pre- 
cisione. 

1 30 PLOT 127,01 D 
RAM OVER lj INK 7 
*RND*e5, 122,B00 i G 
0 TO 100 

Le cassette con 
questi 

programmi... 

... possane essere ordi- 
nate con il tagliando a pag, 

51 , 

Dobbiamo perù precisare 
ette sulle cassetta è stato 
possibile riprodurre soltanto 
il software relativo allo 
Spectrum: le registrazioni 
per io ZX 81 non sono suffi- 
cientemente affidabili. 

Su ogni cassetta trovate 
tutti i programmi per Io 
Spectrum pubblicati sul nu- 
mero corrispondente della 
rivista. 
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Utility 

Tape-test 

di Luigi Callegari 

Un programma per provare 
l’efficienza del vostro 
registratore a cassette 


Questo programma permetta di 
effettuare un accurato controllo 
delia quanti Pei registratore a eas- 
sette che utilizzate per lo Speotrum. 

Scritta In basic si andarti, l'utility 
provvede alla memorizzazione in 
RAM di due routines In linguaggio 
macchina, le istruzioni per l'uso so- 
no contenute nei programma stes- 
so. 

Il test qualitativo viene eseguito 
Incidendo una nota a frequenza co- 
stante tramite un'apposita routine 
assembler. Questo segnale viene 
poi analizzato dalla seconda routi- 
ne assembler, che provvede a me- 
morizzare In un apposito buffer di 
51? locazioni, a partire dell'indirizzo 
61000. 2&6 valori, rappresentanti la 
frequenza media dell'onda incisa in 
eguali periodi di tempo. 

In un sistema perfetto. Infarti, 
Tonda sonora avrebbe una frequen- 
za costante, a il programma conte- 
rebbe, in 256 intervalli di tempo 
uguali, un eguale numero di zeri in- 
cisi. in realtà la frequenza varia, 
tanto più sensibilmente quanto più 
è scarso II nostro sistema nastro- 
registratore, a causa dì distorsioni 
e/o variazioni di velocità della c as- 
seti a r sla durante l'incisione che 
nella riproduzione, 


Il programma mostra finalmente 
un istogramma (diagramma a barre 
verticali! rappresentante grafica- 




misurali. Inoltre stampa sul video (e 
su carta, se abbiamo a stampanti- 
na Gollegata, tramite un COPY) I va- 
lori di massimo e minimo misurati, 
la frequenza media e formula infine, 
In base alla varianza del dati raccol 
il, un suo ‘'giudizio personale” sulla 
qualità deli' incisione. 

SI consiglia di effettuare varie 
prove, variando volume e tono sulla 
piastra, per cercare di otls-nere li 


massimo di risultati. 

Il programma è Interamente scrit- 
to tramite subroutines, perciò si 
presi a facilmente a modifiche. 

Una precisazione; le routines in 
linguaggio macchina sono state 
collocate fuori dai primo banco di 
16kdi memoria per evitare, forse in 
un eccesso di scrupolo, interruzioni 
del lavoro del microprocessore da 
parte della ULA. 
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Continuai lespam s ion e dell* ilaitirt r orti c 


La Mastertronic continua a introdurre novità' sul mercato del 
software. 

L'ultima iniziativa consiste in un accordo con la Firebird 
Software, dal gruppo British Telecom, per distribuire la gamma 
di computer games "Firebird" per Sinclair Spectrum e Commodore. 

Queste e altre novità" per la primavera vengono presentate in 
Italia in queste setti mane t in particolare, la Mastertronic e' 
presente al SI DA di Bologna <16-20 febbraio). 

Tra gli ultimi titoli per Spectrum, segnaliamo! Chiìler, 
ttagic Carpet, Formula 1, Flnders Keepers, Apollo 2, The 
Ad ver tur es of St . Ber nar d . 


All 'ultima spiaggia* Sinclair C3 


L'ultima spiaggia e r quella del cong est ion amento urbano e 
dell'aria inquinata, Sinclair C5 non e', questa volta, un 
computer, ma la mini -auto elettrica prodotta dalla Sinclair 
Ueh idea. 

Costa (in Inghilterra, per ora) esattamente come il QL, e J 
1 unga q uas i d ue me t ri, 1 ar ga settant ac i n q ue c eri t i metr 1, p esan t e 
circa settanta kg, batterie comprese. 

Monoposto, tre ruote, scocca in materiale plastico ad alta 
resistenza, dotata di pedali di servizio per le salite o per 
quando gii accumulatori sono scarichi, si guida in posizione di 
massimo relax, con un manubrio di tipo motociclistico che passa 




sotto le gambe. 

Appena presentata, in Qran Bretagna e" 
già' al centro delle polemiche! priva 
di targa, immatricolazione e libretto 
di circolazione, può' essere 

guidata a 14 anni senza patente 
ne' casco, e gli esperti 
inglesi di circolazione 

stradale 1 'hanno per questo 
valutata "peri col osa 11 <ha 
quaranta chilometri di 
autonomia, a 25 km 
orari ) , 

Dovremmo vederla in 
Stalla in autunno. 


TIZ IE NOTIZIE NOTIZIE NOTIZIE NOTIZIE NOTIZIE NOTIZIE NOTIZIE NOTIZIE NOTIZIE NOTIZIE NOTIZIE Pi 
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NOTIZIE NOTIZIE NOTIZIE NOTIZIE NOTIZIE NOTIZIE NOTIZIE NOTIZIE NOTIZIE NOTIZIE NOTIZIE NOTJ1 


Pi dia cosa e' fatto il OL 

■Cernì» prtnuroianfntfl comuni e* la Borg -Warner Chemical a, il 
contenitore a i taeti dai DL (a dallo Spactrum 40+) «ano in 
CYCOLAC URI marchio registrato dalla l.W.C.I, un matariala 
plastica («bai di lunga durata a di accollante aspetto 
superi telala. 



.-*a' un varo Piccala Gigante. 

L'aspetto «stari ara a' di un 
tranquillo drive par floppy-disk 
da 5 pollici, ma quallo che 
na se onda sbt t a lai egan te «e atei a 
nera e' decisamente «or prendente: 
microprocessore 2 90 A 


. £4kbytes 
di RAM, unita' floppy da 5'" 1/4 
doppia f accia/doppia densità' 

<320k formattati), due uscite 
RS232C per qualsiasi tipo di 
periferica con questo protocollo 
di comunicazione t modem, 

accoppiatori acustici, plottar, stampanti, etc.l, posaibilita' 
di allacciare altre due unita' per floppy, passibilità' di 
col legar» l'interfaccia per uno o due hard-disk. 

Non e J finita: Piccolo Gigante mi collega a qualsiasi computar 
disponga di una porta sari al a R0232C, a gestisca tutta la 
periferiche con il sistema operativo GP/M ÈRI, offrendo tutte li 
possibilità' di applicazione chi 
software disponibile "satto GP/I 
Piccolo Gigante e' imnedi starnar 
al GL (oltre che, per es- , al Gl 
Sharp P C 5 000 , etc»). 

Prezzo indicativo: L. 1.500.000. 

DataB. - Milano, tei . ( 02) 43T023, 

Piccolo Gigante •' un prodotto interamente italiano. 
Distributore esci usi voi DataB., vìa Pirelli 2é, Mi 1 ano. 

Ot) CP/tf e' un mmrehip registrato dalla Digitai teaesrcfi 


Per u 1 tari ori i n f or maz i am i i 


= NOTIZIE NOTIZIE NOTIZIE NOTIZIE NOTIZIE NOTIZIE NOTIZIE NOTIZIE NOTIZIE NOTIZIE NOTIZIE NOT 


Sinclair CwfHtìa - 44 




IlE NOTIZIE NOTIZIE NOTIZIE NOTIZIE NOTIZIE NOTIZIE NOTIZIE NOTIZIE NOTIZIE NOTIZIE NOTIZIE NO’ 


Due titoli specifici per Si nel «ir. Imparate il basic con lo 
ZKBi * Imparate il basic con la Spectrum, entrambi di Mark 
Harrison, in mezzo ad altri di sicuro interesse, Comes Microsoft 
Basic, Pascal, 11 manuale del CP/M, Il '‘debug" nei personal c, » 
Introduzione al LIBF, etc« 


Multi metro digitale con lo Bpsctrun 



Presentata, per il momento 


come prototipo,, dalla E. 3.1. 
di Vaprio d'Adda (MI I , una 
scheda da col legare alla 
porta di espansione dello 
Spsctrum per trasformarlo in 
un sofisticato multi metro 
digitale, con 

caratteristiche degne di uno 
strumento prof essi ansisi m‘ 
in grado di misurare 
tensioni e correnti (sia in 
continua che in alternata! e 
resistenze (con metodo 
indiretto* | quattro canali 
d ' ingresso differenziali, 


risoluzione di 2.5/1000(9, con segno, polarità e superamento del 
fondo scala, valore di stabilita' tipico minore di 100 ppm, 
auto-zero automatico a agni misura, campionamento con 10 
conversioni /sec , due allarmi, indirizzamento sull address-bus 
dello Spectrum (AB/A15!, consentendo 11 parallelo di piu' 
unita', completa programmabili ta ' del softHare anche in basic 
(usa IN e QUT) per quanto riguarda -Fondo scala, DC/AC, selezione 
canale, conversione, attivazione allarmi, etc*f alimentazione 
diretta dallo Bpectrgm per la singola unita', esterna nel caso 
di sistèma multiplo. Prezza orientativo! inferiore a L. 300. 000. 


D IDATTIC A 85 a^ 1 ' i insegna d ell i n f creati cl 

Ampia spazio per 1 'informatica didattica (la "di asmatica"* * « ! 
al HI Salane delle Attrezzature e Materiali per la Didattica, 
tenuto alla Fiera di Milana dal 19 al 25 febbraio. Tra le 
iniziative, un sondaggio-concorso, organizzato dall 'AICA 
(Associ az . 1 tal . per il Calcola Automatico!, per gli studenti 
delle scuole medie (inferiori e superiori!, che abbiano 
sperimentata l'uso dell * si ab oratore come strumento per 
1 apprendimento. 

Parallelamente, 1 ’AICA si e' impegnata a svolgere un censimento 
del software didattico, con l'obiettivo di realizzare un 
cataloga ragionato della materia. 




S(J - Snellir Oumpute* 



OSTARE 

STANCA 



DIGITARE STANCAI 
I programmi più interessanti spesso sono 
motto lunghi, un listato pubblicato è faticoso 
da leggere... 

Sinclair Computer vt offre un alternativa; le 
cassette con tutti J programmi pubblicati sulla 


r 


Ogni nastro contiene li software di un nume- 
ro di Sinclair Computer, e un prora» Incredibil- 
mente basso; solo $.800 lire ( * 1 
spese di spedizione). - - — - 

Riceverete le cassette 


Un'iniziativa condotta con 
la nota rivista Computer 



I vq lumi, che ììd'id tariu iL>jé in vafMHa nella 'nrglkni ub 
possono arche assire ricniusi di' sili; .menta all’Edilore. 
Impor tarlo : l'ordino mimmo uos'i ù L L ^srt: di 1_ 15.000. 




M Edizioni ACANTHUS 



luhi chi ai e 
det'inlloriTMrtrcBi « p»r gli 
'-.nomimi -K:: hanu rasigonza 
di Kccetsia ala dinamica 
lanaramra arglaasiof». 


spasa poalai L. J.-aoo 

colale L. 


^sghc-Q orni rasseg na I; (kraiB jóiù L. ?.000 (Mr unlrttb'O Bpflflfl posigli al ncawimento 
Pdlrft r&Mhuira ì libri «Ilio S giorn se non Saranno di m« [ywjimanCp « avara il nmbar 
30 immotfalio 

QQSMQ ME 


NOME 


vu 

N. 

c.A.p. citta 

fieitóA 


DATA a^B 

Son'Lurfl in Stampa re, Yù e ipt ave l'f> Ol ite ùfthjsa. 

w „ w 






un tasto 
per volta 

di Filippo Ventura 

Tuffa la tastiera 
dello Spectrum 



PREMESSA 

Nei numeri HO di S.C. abbiamo esa- 
minato i tasti delta prima Fila, che hanno 
1 unzionainem i un po' diversi da quelli 
delie tre File inferiori. !n particolare, ol- 
ire ai sodici invisibili (attribuiti colore}, 
quei testi hanno ro stesso comporta- 
mento quando II cursore al trova m stalo 
■ K- o in slato "Ln. 

CI* non accade per gir altri tasti, su 
cui troviamo le 2& lettere doM'alfa&eio (a 
parie lasciamo i 4 tasti Melativi*; en- 
TER, BREAK f SPACE, i due SUI FI}: in 
modo NORMALE, cioè senza aver tocca- 
to gii shift. con il cursore in «K» viene 
stampata la funzione scritta in bianco 
sut tasto, mentre In *L a appare Fa lettera 
minuscola corrispondente al tasto stes- 
so (In kKo II cursore si trova quando II 
computer ait-ende un nume-rodi linea o 
uno statemene, e passa automatica' 
mente in +1* dopo aver battuto un'istru- 
zione), 

Per brevità, l'esecuzione «modo 
NORMALE'cursore L* viene omessa. 


NORMALE 

Stampa dalla furinone PLOT. Le 
scherme dallo Speetrum è diviso In tansi 
quadra; mi (24 righe x 32 colonna ■= 733 
quadratini, ma re duo righe più basse 
non sono normalmente disponibili par 
L'utente), ciascuno Gel quali è composto 


da S’é puntini, che possono essere ac- 
casi o sdenti. Proprio questa* la funzio- 
ne di PLOT-, cioè di tolOrare uno del tan- 
ti puntini presenti. 

Ma due argomenti, separali dalla vir- 
gola: il prime dice q uersto di sta dall e co- 
lonna all'Estrema sinistra II punto che 
vogliamo colorare; il seconde dice 
quanto disia dalie linea di base- PLOT 
0,0 evidenzia l'angolo ìn basso a sini- 
etra, sopra le due linee di editing. 

Onesta funziona ha vària applicazio- 
ni: serva, avidenlemente, per posiziona- 
re un puntino sullo schermo, quindi, ri- 
petuta in un loop controllato, pu* colo- 
rare un'area definita -ma il procedimen- 
to in basic è mollo lento. 

Serve poi par posizionare la ° penna* 
prima di ORAW o CIRGLE (vedi); per ese- 
guire questa operazione senza -asciare 
traccia, digli aie: 

PLOT INVÈRSE 1 AND MOT EQ1NT 
K>y 

ri guasto modo, il pixel indirizzato. 
Che FoiSe inthFosifalo o no, non viene 
modificato. 

Ancora, PLOT serre per trecctene li- 
neo che nonm siamo nè rette nè circon- 
ferenze .;c parli di queste] e, più in gene- 
rale, per disegnare una qualsiasi curva 
di cut ss poasieda l'espressione male- 
malica. 

Per tane questo* occorre per* un ade- 
guato SuUwìtC, e urià trattazione appe- 
na indicativa riihredsrebibB troppo spa- 
zio par IO Scopo di ouasla rubrica. S.C. 
ha già pubblicato un Ottimo programma 
per le sludio di funzioni sul n. 32 laul. 
Stefano Agresti], a cui vi r mar di amo, 
Ec-co, comunque, un piccolo eaemplo, Il 
tracciamento di un ellisse, che usa le 
funzioni SIN e CQS, di cui diremo Ira po- 


co: 

10 FOR n =0 TQ 2' PI STEP Rlffi» 

20 PLOT 127 + 120'COS h, 
37 + 60’ SIN n 
30 MEXT n 


SYMBOL SHIFT 

Stampe de simbolo^ , ohe Ss legge 
71 ‘n ore o uguale, e che viene utilizzato 
ogni qual volta si debba decidere sepre- 
se due quantità iduc variabili oppure 
una variabile * una costate) la prima 
Sia mFnùrc o uguale alla seconda. 

Questo minoreiuguate fa parte del 
gruppo dagli operatori decisionali che, 
usati in abbinamento all'Istruzione *IF 
condizione THEN esèCuZJbne* e agli 
operatori logici AND. OR, WOT, consen- 
te al computer di prendere decisioni par- 
ticolari. a seconda deflo sfato in cui si 
trovano le variafini confrontate, 

Permeile insamma una esecuzione 
non sequenziale delle istruzioni. Studia- 
tevi il Seguènte esempio: 

LET x=x + (10 AMD K) 

- (7 AND H>K) 

(il Simbolo , maggiore, ho vedremo 
irà poco Sul tasto VI»}. 

Pèr l'uso degli operatori logici AND, 
NOT, OR pazientale fino et prossimo nu- 
mero. 

Notate che il confronto può avvenire 
anche con variabili non numeriche hi 
questo caso, vengono presi in esame i 
codici ASCtt dei caratteri! (quelli che si 
ottengono^con CODE], iniziando il ton- 
fffifrto da quelli più a sinistra, Ciò rende 
mollo Semplice l'ordinamento alfabeti- 
co di uri arrày di siringhe: lo Spectrum 
riconosce San-za problemi le priorità di 
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fUU» 3u 

Aitanti par* quando ai mischiano mi- 
nuscole. o iettare e numeri lévsnto feci- 
le In una codi bea d'arehlvki): ie volata, 
per esempio, cita «abcS» venga pósto 
prima eabclD», dovrete scrivere 
■tìdB*. 


CAPS SHIFT 
'0 maiuscola, 


MODO “E” 

Promende II testo In modo "E”, a(te- 
fiiimo la slampa Polla fu nz-lone trigono- 
melnca seno |5lh ) 

Consideriamo net plano cari«i#no il 
punta P. che pfQtattian» in H suli'as» 
dati» X.. e congiurammo eoo l'origine 0 
(kg. 1 ;. sì putì dimostrar* eoe I rapporti 
HROP. HCWOP; HPfHO non dipendono 
dal punto P. ma Sdita funzioni dall’ango- 
40 a. Infatti, a ogni valóre di questo an- 
golo corrisponde un particolare valore 
per I rapporti cx>ntHjar#t* 

Chiesta funzioni hanno ciucimi un 
nome pen nota agir eludenti ai dice Sé- 
no di t H rapporto ira it mtaura di HPe 
li misura di OP, COSENO li rapporto tre 
la rnrauts di HO e OP, TANGENTE guano 
Ita le misura di KP a di HO. 

Conarderando uni particolare circon- 
ferenza, detta rgonlomalrlcan, averne II 
Cedlro coincidente cón l'origine degli 
Assi e per raggio Furiitl di mtivra, si de- 
Fiftiace sane di un ingoia I ordinata e 
egeeno 1“ ascissa di P [Ffg 3], Quinto el- 
la tangente, sj può d»me*ttaro che geo- 
mtlrlcamenla é 13,31 “ dair'ordlnata di T, 
Intersezione tre la retta 1 angarile In a al- 
le circonferenze e il prolungamento di 
OP 

Questa funzioni Hanno quindi per ar- 
gomento un angolo, cita logicamente 
ieri compreso tri 0 a 3NS0 gradi , io Spec- 
Irum peri riconosce «fe ingoili esprss- 
il In ndttpjf fi radienti ■ 1 90 ptgftcc, 
quindi poco più di V gradi sess&ges i 
ad a sotto questa tarma che dovremo 
tornire gli argomenti. 


SYMBOL S, in "E" 

Otteniamo lo stata mani ASM. erte r ap 
presenta le funziona Inversa del sane, 
detta arco-sano. Raaltlulscà l'angolo it 
dui pano è note (sempre In radienti): 

PRlNT ASN 1 

ita come risultata 1 5707963, Cioè 
PUS. 


w 


NORMALE 

Oi teniamo DRAW, 1 unzione natural- 
mente assoc iai a a PLOT. Serve per di se- 
gnerà linee rette ó areni circolari. Nel 
pumd ceso richiede dui argomenti. nel 
secondo ire, separati da vligole 
DAAW *, #, jy 

Li lima CM verrà disegnata pulirà 
dir punto in cuf si trova u penna virtù#- 
li delio schermo: dopo CLÉAR. * aita 
c ordinate 0,0, ma. abbiamo vieta prima 
Cita può essere posizionata In qualsiasi 
punto ir,y, mediarne PLOT. 14 punto di ar- 
rivo t arie coordinate relative s.ò {gli ar- 
gomenti che abbiamo datol . Intese co- 
ma disianze retarne natta posiziona di 
p*H«nz* 

Qualche esempio- 
PLOT aia OflAW 2M.0 
disegna una linei dai margine lim- 
etta delta serratane, su 'ordinata io. pa- 
rallela all'asse k, uno ai margine destro 
PLOT M: DRAW 300,10 
disegna una retta dAH'Origlrw al pun- 
ta di coordinata 200,10 (evidentemente, 
«a parile dall'ongine gli argomenti coar- 
cldono con ta coordinate «notata detta 

finestra video).. 

Motel# che a. possono esser* «che 
negativi. 

PLOT 100,100: DRAW -10. -35 
disegna una linei tìriziontala dal pun- 
tò 100, T00 diretta verso sinistra e verno 
Il passo. Se gh argomaob dati portano 
la panna Inori dalla li nastra video, il pro- 
grammi si interrompa con messaggio di 
«rror# H Htteger puf óf r#og* 

DRAW permette «neh# di diwgrwe 
archi di circonferenze, usando un terzo 
argomento: 

DRAW a, b, h 

In cui a.t- sono usiti per ìpeciiicare il 
punto di arrivo deire linee, esattamente 
OOflta ne cast precedenti, fri il numero 
di radiaci i deiTangcHó at centra deità cir- 
canferenza valuta, cfl* Sari tracciata 
vano sinistra -se h 1 positivo a verso de 
atra sé h È negativo. 

Ss tr= pigreca si ottieni un semicer- 
chio; 

10 PLOT 100,100: GRAW M.50.PI 
Annotiamo qui uni urei twist Ita Cu- 
IMM deio iti (emani dRaw a. Mi. do- 
vuta 1 un piccolo beco del eiltema epe 
ferivo. Ubando P*r «t tarmine A valori 
«nomali, ai ottengono In alcuni casi ri- 
sultali divertènti. Scrivete quésta cre- 
Vleaimo programma 
10 PLOT 127J.7 

Che posiziona ta panna «I cent m delle 
aehénno, e 
20 DRAW 50,50, A 

e provatelo assegnando di volta in 
voile# ftl seguenti valori: 111 , ZZZ, 300, 
100 500. 500, 700, 900. Ut. 3220, 5670, 
Mas. 9000 (ne esistono "tatti altri, que- 


sti «no esempi), una variarne 4 
DRAW OVER 1 : (etc-j 
Altre le potete Inventare voi, ineeren- 
do «Uri #1 Pittati di stampe. 

SYMBOL SHIFT 

Stampa il àimboloO. che SI legge di- 
verso da, e serve, in maniera analoga a 
miówaAiguafe, per consentire al com- 
puter di prendere darle decisioni, 1 se- 
conda darlo 91 alo di particolari variabili, 
in questa caso-, la scelta 9 qondizianala 
alta nofl-4/g{/agManzi dei due lermini 
meeii a confronta, 

Anche qui posso esaminar* tu nume- 
ri che itringhei. Per esempio 
IP ito Ciccio" THÉN GO TO^ 
Oppure 

IF a< >ì T THEN L£T a • -1 60 TQ.- 


CAPS SHIFT 

"V r maiuscola. 

Avrete notato. « questa punto, che, 
latta eccezione per 1# prima ina di tasti, 
non meta differenza Ita modo ”£“ * 
CAPS S. m “E"- pw questo motivo, in- 
che il modo CA PS S, In H E' ' non verta più 
citato. 


MODO "E" 

Funripn# COS fmmui già spiegar# 
dati agliai ameni e (vedi senqi Per ->igo- 
mento da fornir#, valgano le stesse con 
9 icletaziqni fette per Sin, 91 può aggiun- 
gere quefeoai sor lìmiti di teli argomen- 
ti. potate verificare Facilmente per vo- 
alta conta che 9 possibile assegnare 
q Udini tini numero, poiché- Il computar 
provvede a inlorpretarJP come Se tosse 
ridallo el primo gira (cioè g modulo 2' 
pigrmeal 

Se votate ridurne VOI l'angolo {in quél- 
che cuo può essere n«e»ario), procè- 
dete cosi. 

I = i— (IMT(ittiPI)r2-Pt, 


SYMBOL S. In "E” 

Otteniamo la Funzione aCS feroc- 
COMnoji. E ta lunóooe mveru 31 COS, e 
restituisce un angolo comtpondenta al 
valore di coseno che Forniamo in argo- 
menta. 

La funzioni SIN é COS [cpnlronteto le 
detlnlelono data 0 !a loro rspprnsontfr 
zLcne gopmetrics) hanno anlrainfie limi- 
ti ben definii I spaziano samprs Ita —1 é 
+ 1 ; «a l'argomento dJ ASN 0 ACS ecce- 
de quéth valori. Si h# errore A in ytW tA 
girjngnf Provate pweguiie PftlNt SIN e 
COS con valori quUaiaei, e quindi 
FRI NT ASN e ACS con I rtauKab Ottenu- 
IL 


M Brnciajr tsrrpiàef 


E 


NORMALE 

Qui abbiamo lo Btatement REM È 
un'Istruzióne oda =non !a ntanlen; Ytene 
usala principBfmsrcte per Inserire com- 
menti nei programmi, 

Linea REM non seguila dà alcun teste 
&i usano per migliorare la leggibilità al 
un listato, quando guasto debba aerare 
da documentazione a, m genere, essere 
lelto da terzi. 

Linea REM con brevi commenti, rn for- 
ma di E itoli o sommarletti, 0 serTidl ics- 
mante con simboli grafici, servono per 
identificare l'Inizio d> SuBfOutinas. pro- 
cedure particolàri. parti importanti del 
listato, 

itotele ohe «vanlualr istruzioni cne 
seguano una REM nella stesse linea so- 
no ignorate: 

10 REM Frase: GO TO30 
20 print “Sono «ila 20” 

30 STOP 

11 run provocherà la Stampa di "SCmo 
alla HT, a l'istruzione 0-0 TO ewn viene 
p^aSa in considerazione si possono in- 
vece mettere REM come Statement (ina- 
li di una linea. 

Linee REM pòsta in un punto da! pro- 
grammo ideotirFca&ila coma indirizzo 
assoluto nella mappa ci memorie (aplt- 
tamante all'inizio dell'area basic] posso 
no servire coma ou Fior d I carica .men lo di 
brevi routinea in codice macchina; dui 
occorre però Fare attenzione: 

— se usate lo Speclrum senza inter- 
face 1, nessun problema: là prima linea 
di programma 

i REM apode... 

parte Sempra dal ia i oc azione 2376$, a 
I primo byte disponibile (dove si trova la 
Feti ara a l è il 23760. Provale a dare PO 
KE 23760, 143 e vedrete che Ja & viene SO' 
stiluita da un quadratino nero: 

— con l'Interface 1 r l'inizio do l'area 
basic diventa dinamico,. e potrà assere 
identrfioato. mcm&nlo, par momentc, 
cgn 

PRINT PEEK 2373$ + 256‘PEEK 
23736: 

a cri si sggtunge la I imitazrana di po- 
tar utilizzare solo routines in c. macchi- 
na totalmente ruotatili. 


SYMBOL SHIFT 

Simbolo =5* , da leggersi msggfpre o 
r a r esattamente it contrario dai 
mtnofé p ugnate visto prima- Valgono le 
considerazioni g. è fatte. 



CAPS SHIFT 

"lf r minuscola 


MODO ,£ E ,J 

Funzione trigonometrici 7AN (tan- 
gente'/: i significato geometrica è eSatc 
accennato sopra (vedi SIN). È definibile 
anche come il rapporto tra il seno ed II 
coseno. Come Si puòvgdera nella figura 
2, è rappresentata dall'ordinata da! pun- 
to T. Notale Che. Sé l'angolo a d< Late li- 
gora c/esce fino a 90 gradi, l'ordinata 
assuma un valore grandissimo UAnde 
ail'fflfinitò). 

Perciò la tangenfe di 90 gradi 
IdfgrecDtè} e dei suoi multipli dispari 
1270. 450, ecc.) non può èssere ornaste 
al computer: se provile à scrivere 

PRIMI TA.N |Pli2) 

ip Speclrum risponde con errore 6 
Wpmper tao big. 

Continuando nella divagazioni, un 
problema ohe incontrate spesso usando 
le Funzioni trigonometriche sarà la con- 
versióne da gradi sessagesfjftaf/ (gr ad i, 
primi, secondi a radianti e viceversa; il 
passaggio gredl/radi arili e apparenle- 
manta eamplrce: 

X tradì - x (deg) f fBÒ"Pi 

ma se avele le fra^Orii di grado e vola- 
le un calcolo preciso, dovale prima 1 r&- 
a ferma re primi e secondi in frazioni de- 
cimali di grado; ecco una formula esau- 
stiva: 


X' = SGN X' (LWT fABS Xf+(A8S X 
-II4T (AB5 X])* 513) 

che potrete imredurre nei programma 
con una PEF FM; il dato va inserito par 
3a conversane scrivendo primi è secon- 
di dopa il punto decimale, 

SYMBOL S, rn L ‘E” 

Otteniamo la 1 unzione inversa della 
tangenle, ATN (arCeUengenreìL Essa re. 
Stitulsce L'arco la cui langerrte abbia un 
valore a noi noto. 

L'uso dell' istruzione é , come par la 
precedènti, molto semplice; 

PRINTATN x 

LET w = ATN y 

atc. 

poiché re tangente tènda airinflniio 
quando l'angolo tenda a uh multiplo po- 
sitivo 0 negai ivo di Pira, ATN non andrà 
mal In errore, Con qualsiasi argomento. 


R 


NORMALE 

Sul tasto R troviamo la funzione RUN , 
Mie "la partire’' un programma Basic. 

Può essane dato da sole, o con un ar- 
gomento numerico positivo (anche il no- 
me di unà variabile esisterne}: Pél primo 
caso, l’ esecuzione del programma inizia 
delta prima linea tfl Basic esistente, nel 
essendo dà quella avente i‘ numero cor- 
ri spendente aiF'&rgomantcJ; ae quésto 
ctanca, dalla prima Ohe segue: se non 
na sai stono, si ria un massaggio Q QK. 

RUM ha J'efièftó di cancellare tutta 
['area variabili dal basic, ripulire la cata- 
sta, cancellare il disptay-tiSe (lo sciw- 
me): è equivalente quindi a 

OLEAR: GO TO... 


SYMBOL SHIFT 

Simbota^, cioè "minora di", prie 
svolge funziona simile al già esaminato 
"'minore o uguale". In questo caso, co 
me potate intuire, si prendono In cOriSl- 
aerazione soltanto i casi in cui H primo 
tarmine é minore da! secondo, 

CAPS SHIFT 

"•R" maiuscola, 

MODO "E" 

I NT. che Sta per "Intero". Questo ope- 
ratore serve per prelevare la parta intara 
di un numero. Notale Che arrotonda 
Sempra all'intero Interiore; perciò, nel 



Sinclair Conrpusr - 56 


caso di numeri magativi, il risultato può 
essere d iverso da GUétlb Cine vi aspetta- 
t8f per esemp lò; 

PRIMI I NT 2j85 dà 2, ma 
FRINTIWT— 7.94 dà -8. 

Esaminate l'uao che ne é stato fatlo 
nelle routioes di conversione preveniate 
prima con le (u-njlbni trigonometriche: 
se nep avessimo usato ABS (il vatore as- 
eoluto), ripristinando li giusto s*gn-o so- 
lo alla tira (con- SOM), It risultato avreb- 
be potuto essere distorto. 

SYMBOL S. \n “E" 

VERIFY t un comando relativo al regi, 
stratore |e ài Mlcrodrtve, se collegati 
rinlerfaca Ifc serve per controllare Che 
un programma, eventualmente con lé 
sue variabili, 0 ufi blocco di hyies Sia 
stalo salvato correttamente. 

Avendo ovviamente il programma an- 
cora in memoria, ài digitar 
VERIFY ‘'nome prùg" 

Si ripose? tona il nastrò all'inizio della 
registrazione e io si avvia. Se e tulio a 
posso, dopo che ir nastro è stalo rifello 
otteniamo un OK. 

Per gii altri tipi di lite, la sintassi pre- 
vede queste possibili aggiunte: 

VERIFY "■rrtìrtnT COOE frx, Yfì 
VERIFY ''nome'’ SQREEN $ 

VERIFY f 'noj7le ,r DATA Sff (oppure e$ 

tìl 

ohe verificano, nell'ordine, un blocco 
d« byted feon l'eventuale specifica di 
start e lunghezza), uno schermo # un ar- 
ray .PI VERIFY dello schermo fai registra- 
tore), peraltro rara manie usato, vi darà 
però- errore, poiché II messaggio di lite 
individuato allora evidentemente lo 
schermo; può essere Invece eseguito re- 
golarmente con il Micrctfrlve. 


T 


NORMALE 

Questo tasto* molto usate, ma pochi 
ianno eEattamenle Cba cosa la: RAR- 
DQMI2E (abbrevialo In RAND sulla ta- 
stiera! è conosciuto ai piti perchè serve 
per Supportare USR, Cioè la chiamala al 
linguaggio macchina, pai il motivo che 
non altera nlenle nell'eros, beale: nè il 
programma, nè le variabili, né lo scher- 
mo. Produce soltanto un OK in area edi- 
ti ng, se eseguito Girati emette ds tastie- 
ra. 

RANDOMIZE. Che pui esser* Chioma- 
to con q senza un argomento, iniziale 
la routine di generazione dei numeri ca- 
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Sinclairisti, 

C onsemrtwni ni presentarmi in due righe: mi cmanio VinomM fiartoscheiii, ho 
39 tìn™, sesie e&e ad Aiùairalft in provincia di Milano e da poche ultimane 
sane il dire] (gre generale dalla Sinclair Mito 
A 21 anni entrai alla 15 -M. dova mi sano InrrhaM proleSEtenalmente. hai 1979 pass 
alla erezione MlWierciale Usto Servine Cdls COnlrOl Patì, dove rimasi lira SI marza 
rasa. n qupg^ anni, a. «anco delia positi espHrianza maturala nel settore Dala 3 asc 
e Care OommunicKion . uliliZZPnfld i p-ù poderli alate- atari oSiSlenli (Cutter 305 - -J. si 
andava samara più raPtoriandO in me la oonvinz,o-ie che non ii grande ma II piccato 
^sterna, frutto di .nume tBCndogie. avrebbe «siituito :i luterò dell’ informatica. 

Pregno nel coma ricornerdlÈ, Clive Sinclair Ircnriò s vendere par céf rispondenza 
k) ZK m 

Ccnsapevoie delia poisniiaiità di cueslo mer-calo. neir-fi3 passai alia Cemmadore 
Iterala, csme Siretlcre vendile Distributori Regionali. (m&mwb che he ricapenn InD al 
30 Effltsmb-e 1&34 

Ùueat'jll.-na esperienza mi é Stala male utile per cnncsccre la diSirtOUTicne indiretta 
dèi pr-adpnn. tramite distribuii e -detlagloah, «pira i torà arebicnii e il rapporto HO 
I utente, lor-lare ile e par to sviluppa del mercato, 

Iftf ccrse del f&&4. « Sinclair Rammli Limitai rmi contattò per prepormi la 
responsabilità della Slitti** Italia S.p.a.. incaute Oh* ho accettale con entusiasma. 

Ho già avuto moda ni conoscere lo staH inglese. Sto direttivo cne lecnicc , e posso 
assicurare chfl non WWO mal Incontrala persene co Si nrtitrraie né laverò. 

Per quanto riguarda la Sinclair Ralla, il nostra programma prevede i .aerseguimenlc 
del seguanri ofiieBm: 

- organizzare nuovi club di Sinttoirisli pé' OL e mllahcrarc con queiii esistenti 
alb-sverso scamiji o qregrzrnmi e aggiamamerii SOltwaro; 

- Ségoi*0 una nuova f rosolia di sviluppo di sondare applicative. per cesare una 
generaBone dì programmi che consentano di altomare le standard Sinclair: 

— pubblicare programmi d eOcutreenLaziCrte, Sto SOdtWSfie CfW hardware, in italiane, 
mettere a CiSftìSizene c-. Unii nen soltanto il Computer e II sgHware, ma anche ie 
unito periferiche: monlt-ar. hoppy-cteic, barddisit. mudarti, eie , 

— creare una rtte di oertlfl d s^enza tecnica su Infilo H territorio naztonale a casti 
elandard; 

- prestare flarl-Cciare attenzione alle apaiicazinni nal seltoré ìelemaiiCP 
Nei lavoro ho sempre ewcato di seguine una hlcsoliaL essere rnoltd cni 3 Jd e trinco a 
Uganda cnntinuara su quasla strada. 

Vintunze Gariaschehi 
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'ICA LA CLASSIFICA LA CLASSI! 



La Top 25 dello Spectwm 
per il 1984 ( MicroScope ) 

1. DaJey Th J s Decathlon (Ocean) 

2. Jet Set Willy ( Software Project* ) 

3. Manie Minar (Software Projects) 

4. Hu neh back (Ocean) 

5. Football Manager (Addi dive Games) 


6. Sabre Wulf 

7. Beach-head 

8. Fighi or Rlot 

9. Match Point 

10. Full Throtlle 

11. Righi Patii 737 

12. Tornado Low Uvei 

13. Chukkìe Egg 

14. Monty Mole 

15. Snooker 


(Ultimate) 
{US Gold) 
(Digitai fnt.) 

(Fsion) 
{Micromega) 
(Anirog) 
(Vortex) 
(A&F) 

(Gremlln Graphics) 
(Uisions) 


16, Twin Kingdom Volley (Bug* Byte) 

17. Sherlock Holmes (Melbourne House) 

16. Pyjamarama (Mlkrogen) 

19. Chess (Varlous) 

20. Knlght Lore {Ultimate) 

21 . Lords of Midnight (Beyond) 

22. Chequered Flag (Psion) 

23. Hobbit (Melbourne House) 

24. Slagger (Alligata) 

25. Alle Atac (Ultimate) 
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Questo programma è l’evOluzmnB di 
The Bifds and thè fise s, recepito sul 
numero 3 di 5G, restato dagli alesai 
autori. 

Boris, l'ape protagonista dei vecchio 
programma, è stata in trappolata in una 
Specie di formicaio colmo di ani malati I 
0: ogni tipo [cimici, formiche, bruchi ed 
altri non meglio definiti). 

Suo cugino Barnabea, il carattere che 
coni rolliamo, deve «aggi ungerla in ton- 
do alla tana a labirinto « ricondurla, sa- 
ne e salva.. In superficie. 

I problemi peto sano 1 ani I: innanzitut- 
to le al rada giusta deve essere cercala 
per lem ar ivi, poiché il formicaio é conv 
posto da molle vstonze», Ovvero scher- 
mivideo, interconnesse tra lord In modo 
assai contorto. 

Pei vi sono molti nemici: le tormiebe 
tentano sempre di uccidere Bamabee 
Che, se entra In coni atto con una di es- 
se, veda diminuire le sua riserve di polli- 
ne « di Fona. Ogni tanto pereto deve am 
Che cercare qualche liora (non ancora 
sfruttato) e rifornirsi. 

II Bello del gioco risiede anche nel Far- 
lo che Barnabee deve, quasi ad ogni 
schérmo, andare 3 cercare avwitiwll 
aperture nascosta, Che si schiudono so- 
le quando vi passa vicino- Ah re aperture 
diventano palesi solo succhiando il pol- 
line da CC^ti flpri disseminati sullo 
schermo. 

Fortunatamente, una volto aperte, 
questo via di comunicazione tra una 
stanza s l'altra rimangono tali, por cui è 
possibile farsi una mappa della strada, 
per ritrovare la via del ritorno con Boris 
più velocemente. 

il programma è mollo ben fatto, grafi- 
camente simile aito storico Manto Mine; 
por tantasia é Bellezza dei van sprrfe 
che si muovono indìpendememento sul- 
lo schermo. 

Anche il lato sonoro ò curato: ss 
lo si desidera, viene eseguita duran- 
te il gioco una Toccete e Foga di 
Bach arrangiata probabilmente dal- 
lo stèsso Barnaba*, visto che e 
C tua ramo ni 0 «ronzai ai- piuttosto 
che suonata, 

Grtfffca-’ animata, colorata, 
divertente, tecnicamente par- 
letta. 9 

Comandi: comodi e sem- 
plici t3) anche con joystick. & 


ECENSIONI RECENSIONI RECENSÌ 


□all'atto lo basso: 
Amica, 

Codename Mal, 
Pio ball Wizard, 
Spisi- 



PENSIONI RECENSIONI RECENSIONI RECENSIONI RECEiSISJONI RECENSIONE RECENSIONI REC 


GtocabStifà «levate. Facile 
Iniziane e poi appassionante 


Cornarti?, suggerito il Joystick. 

10 Abbastanza buòni comunque, 
Qtocsbifità: non stanca mai., gra- 
zie anche ai vani livelli. 


GtQC8S>iHt&; facilissimo inlzis- 
T na r difficile divenire campioni. 

S 


CQDENAME MAT 
(Micromega) 
Spectrum 40 K 


Questo gioco é una versione notevol- 
.mante potenziate dal vscohio Szsr fi*/- 
dere prodotto dalla Al ari. 

Fondamentalmente è una Simulazio- 
ne Si battaglia spanale, da noi condotta 
dal l'interno di on'ssl fonava da combas- 
[imento con visione dello spazio est*r- 
no in gretlcs 1 ridimensionale molto rea- 
liStica. 

Il gioco ha 3 livelli di difficoltà e 2 poS' 
atolli versioni di nm iasione* da compie- 
rei: possiamo cioè essere semplici piloti 
che devono distruggere le astronavi dei 
Myons, oppure comandanti della Iloti* 
astrale e dobbiamo, quindi, provvedere 
anche, tramite la nostra trasmittente di 
bordo, a Impartirò ordini alle gitine astro- 
navi, per dirigerle contro l nemici. 

Il programma è motto sol leticato: ab- 
biamo Sul video un computer tfi cnmbel- 
1 intento, un radar a preve raggio, un ra- 
par a lungo raggio due cannoni laser, 
uno schermo protettivo, Visiona frontale 
e posteriore dorante il volo (commutati»' 
li manustmente od automaticamente, 
se il computer di combattimento e inse- 
rito, per mantenere sempre In campo vi- 
sivo fa astronavi nemiche), mappa galar- 
llca, mappa generale con lo arato 
dell'astronave. 

Bisogna usure ben 21 testi, g 16 più il 
joystick, per controllare tutte qi?este 
funzioni. 

Durante i Combsltimenll possiamo 
nsluraFmente subire danni, in seguito si 
quali dovremo atterrale su qualche pia- 
neta o luna del sistema, par ettetJur* 
tutte le riparazioni; incredibile la grati- 
ca, ohe provvede a darciimmaglnl d«veo 
as per ogni pianeta (Saturno ha le lune, 
Giove te macchie, la Terra gli oceani e 
cosi via}, mollo reali&tfcheesu-gg-estFve. 

VI sono tre divarai tipi di astronavi 
aliente, di varia potenza e valore in pun- 
ti, con diverse carelterisllche di velocità 
e strategia di combattimento in vote. 

Vi sarebbero molte altre cose da dire, 
ma preferiamo date un semplice consi- 
glio: se vi piacetene- i giochi spaziali 
compratelo e non ve na pentirete! 
Grafica, lipp Indi-menàionala, 
realistica, veloce ip 


PINBALL WIZARD 
(Sagittarten/Cp) 
Spectrum 16 K 


Chi non conosce | vecchi Clipper, dai 
bar. i primi giochi a basarsi sulla veloci- 
tà dei riflessi e sulta solidità del polpa- 
strelli detie dita, ormai rasi vetusti dal 
modero! videogame ai silicio? 

Ebbene questa a una adulazione 
elettronica, piuttosta Fadele, di uno di 
Questi giochi a. incredibile m* vero, gira 
anche sugli Spectrum COTI SOh 16 K dì 
mamorta. 

Abbiamo -due coppie di racchette e te 
classiche 6 palline (con berma), per ten- 
tare di accendere fin BRIGHT) |* scritta 
$A£3lTTAREAN in alto sul video. 

Ci Sono molti spigolf, perni di rilancio, 
saoscri dì punti: manca sete il sensore 
per ii iti 11 f, me tento à inutile scuotere H 
nostra computer, 

I c rimandi sono motto agevoli: 5 lesti 
possono controllare le racchette di sini- 
stra, o altri 6 possono controllare Quelle 
di destra, -un testo lancia, la pallina (il 
congegno cFaasIcp a motta é bàrs simu- 
lato. ad è quindi possibile modulare il 
lancio delia pallina per indirizzarla nel 
modo più proficuo), 0 in più vi Sono due 
tasti per le sospensióne e la ripresa dei 
gioco. 

Sullo schermo è sempre vigilile il 
punteggio attuale e quello record, ini' 
zlalmonte casuale, come -nel veri lllpper. 

La fedeltà e la beitela, di questo gio- 
chino ne hanno decretato in Inghilterra 
un rapido successo, tento che è alato lo 
breve realizzato per altri computer 
|CBM 64, Alari, Amstrad, sistema MS)IJ, 
mantenendo sempre le stesse caratteri- 
stiche tecniche a granché, nonché so- 
nore tfa pàlEina provoca, ad ogni COniat- 
to con q ualche apigolo 0 perno, dai Buo- 
ni che ricordano abbastanza Quelli mec- 
canici originali). 

Un programma, diverso dai soliti arca- 
de gsmes, ma egualmente molto diver- 
tente e sicuramente consigliabile, 

Grafica,- coterata, sonoro, di- 
nari icamante ben realizzate- 

Comandi: comodissimi e pron- 
ti. 


SPLAT 

(ÌSL) 

Spectrum 48 K 


Controlliamo Zippy, un simpatico ca- 
rattere a X animalo, Che deve muoversi 
per te schermo cercando dì mangiare 
tutts le piante ed i Irutticha incontra per 
guadagnare punti. 

CI si muovo perù entro una finestra vi- 
deo, delimitate da mattoni rossi, Su di 
una scenografia molto grande. Questa 
finestra sì muova continuamente e ca- 
sualmente, in lune te direzioni a sa Zip- 
py rimana schiacciato dai bordi perde 
una vita (sono 3 all’Inizio, con possibili- 
tedi bonus}- 

Mgn mano che si procede nel gioco, 
suddiviso in 6 livelli, la velocità di s pe- 
stamente delle finestra video aumenta, 
e aumentano SflClte gli Ostacoli disse- 
minati sul campo di gioco: liumi, fili spi- 
nati, fruiti avvelenai i. 

L'idea è abbastanza semplice ma 
molto originate, c ben realizzate dei due 
programmatori (Andrew & Morgan): vi 
sono 7 diversi tipi di scenografia, un in- 
dicatore continuo detta percentuale di 
gioco svolta, indicatore di punti: a di re- 
cord nonché, cosa Sempre mpiJo ap- 
prezzabile, tasti definibili dai giocatore 
(sono il; I Tifine seno so: legaci li vari tipi 
di joystick. 

Fiossi amo anche -congelare" H gioco, 
nel CASO Suoni il telefono mentre aliamo 
ba ttendo iF nostro record personale. 

un piCCota difetto di $&tm è il tempo 
di caricamento: ben 4 minuti 0 mezzo, in 
Quanto, a Fini dE proiezione conira- 1 pira- 
ti del sofl w*ne, i I programma è si Sto sai- 
vaio come SS occupasse tutti 1 4^152 by- 
te? delta memoria RAM delto -Spectrum. 

Ol permettiamo di dire che la protezio- 
ne è ingenua: da un iato stanza l'acqui- 
rente, dal l’altro è inuilie, essendo- motto 
semplice, per gii ^protettori- di profes- 
sione. smontare e dupl icare un program- 
ma siffatto, ricorrendo ad un prpgrs ar- 
ma in ssaembly di poche linee. 

Grafica: simpatica, abbastanza 
colorata e tecnicamente valida 7 

Cornac tù: otfimE e rideftoibili. 

Sconsigliati i Joystick, 16 

Qiocabl!tt&: -è latita trovarsi a 
i 0 giocare per ore (appassionante). 9 
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CI ANNUNCI ANNUNCI ANNUNCI 


iinclaii- 


ùcimi. 


VENDO 

SCAMBIO 

HARDWARE 


almi, libre "77 programmi". oh- 90 
programmi, SOQ-OH. M AurlUO 
Mantella, MA PordarvPfìt 3B 201 13 
Milano. 02r2iKtf7o 


m liàut 3, lutilo H. 

- “ ut iV. 

4CMI. 



CrodrivB. 1 Cartucce, tuli IlaJlMiO, 
cavi, programmi A--es sauro G*f 
ron*. c jg Pia TfclnaM 80. 20173 


tm, rlvlGlA, 1(30 programmi. 4HKB0 
naiiet H Marea Miriti, Ha A l J 
6 *. 2*100 I 


H * cawrtt» [SMirlt, Ar 

morda Stia, Sfocar. Spaca 
AniiadajL 300 . 000 . Luto* Vani, via 
Spiri lu santo 2 H 3 B 91 BQ Peggio 



SpACIrum UH, AflETk. CAVI raffi 
i Irai or* Sanyo vari giochi. 
*ì0,«0. CrlaUnno Musei. via dt< 
£ sui i B, IXXM6 OrotiaierfitalRM i, 
v 2120. 


.jt, marma!-. 370 OCÓ M*url|tfr 
Bruffolo. Via PKrVIt 138. 10127 Tff 
riha. 61562? 


«UBO 

ML i rrS- 


rarwa, 420.1. .. ... ._, 

vìa 5. lusappn 02, 21D47 Saranno 
IVA], 0Me»7jT. 


fritta 3» PM O ni llai m *0C 00C- fr r» 
gale JH M .Ir.vanvA ELqer a Ben, 

Strada di Pnaptìie ». Ktì.j Crai- 
Cala (Uflf 


Wido CUI Ifft. rr 


*IU«- 


al «Ma, ragni nt 
o a è® 000 Or 
nappa Cfr-JY.1I via Vira a. 2 ICO* 
Ccntquiù fVAj, 0m f 7DQB87. 


SaikoAlu QP&0S. partati* 


Stamparvi* Aiphacam 32, nuo 
vlMlma, 230-000 + a»a* poH*n 
frpn 25 p. 


n». vJa PonìE?» 2aiM 6arg« 
rr» r KHJ2ia4M-21WS1 pasti. 


>próff*mr*nl Inkarf. j; 

- »S» * AH* f 
km li gw Marca borano. «a 
P ana* J, 30100 Sonino. 


Intarlai:» 1 r Mlcrndrlve, iniArtac 
t>A programmatone jovallcli • 
340 . 000 . Ril'Mlt Bfrrracrh. via 


ra-luc-iiia, m«l pulì Kfl.MO ZK 

Piantar, 2 man di oana, 70.000 



Ma rtnq. Ii| Qalpomm- 3. 201 48 PV 


Tannale, ilimanÈ., 30 programmi 

5p#alnati l-flfc Dimtplarte, minui- VTd*offl«hl ia«éWII: Turba Grl- *d0®0 non irattmin. tino Orvig- 
I, 0B9B4HA, 'Idro "77 progrimml" -« (tSBHi), btfTOl W&lktìr IvilQ!'. giano, via CrilailiUnnu tì, 2Q'6l Hi 


7 programmi" 
Iptgjjnpi* tuli* variabili dal aIai 
optici Lue» booti, Mi C. Salrni 

ì*i os w 07 ««aa 6 



iaco r a, man uaii . cam, oitra 300 nro 

grammi , EfiO OQO V Inganno E m*t 1 1 
II, Ma MwHalMn* 41, B3013 Bian 
cavilla [CT|. 


Spo* 5 SH42 Milane 02(6487019 


m* 1* «fQtO ApùltaUi fflMJ, 


fitti 1M, alunant., maikiala, ca- 
vi, iq*i, tini Hauti a caw*fl*. 
1®«3Q LÉrtrtlrq D* Be™a^!iA 
Ma De nota» Ufi 73S1ZZ Bari. 


panna «ito*. tulio 3SO.HB. Loran 
la Eie DOGA, VIA Badi 60. 47032 Do 
«wiatiK > |FCn. 0S*7JS11« 


ì£b 000 cùh IO baiatila tilt» ICO 
programmi fabrmo CrBiranasi, 
via Mignon# 78. i 70 ^'lL Cariala 
iB-vi, fliflaroosK, 

H PiNUar con 5 rafoli di tana, 
eOXrl b» ciabatti*-, va Ram- 
parti 31 . Wi m Filimi. <Xi*XZW 


ala, mas u 2»ccrda<f 
Ipnlim, via WagragM 
2117, 1Q1» OnL-P-s. 0+01581966 
pani. 

ZXii sa, u imrri Manuali. in 
calta E L< giochi, e assalta 
viMmblitHvi'diaaaaembialcra, Ib- 
bre ' 8# programmi", rMat*. 
3WOOQ trvi'vbil-. Ariano Liueri 
Le va liema Ifr-LSL 1E-1H I 


Xactara ut Ha (tonnara 45, BQ125 



David HavBLclKn via PanarMe 
3, 401 2S Bologna 

Su cprtwcLa C* Wrtriwtw, 
Bf^ra a-ócnauLiiib», Altura Sari#* 
. p za liberti 3. 3#044 OaiTtr» 


an fittili 
con lo 1X6 r "66 pvaflrafruni", 
praurimml a datati, Musai UH) Mi- 
nari, Via e. Bianchi 11, 69134 Pl- 
iant*, QUEI? 'Ih 1 


«V» motli pro^immi ■ n. 2, 1 1 A, 
7 S p- 8C lina amena, u* W 
Graeoltafc MiOGVicriza. 65«?; 


Mlarodrtv*. * dunrldgm, «tflatió 
nà oonnpt'HiM di "flun" » di ''B*ii. 
ciiir Ciyp-UdESf", & libri per batic, 
imi', gaatfona informazioni, Pascal. 
Asari*#*. Fcrlh, 300 pTjgrarrW'i 

rea ma; w 329QB&5 -draww pa 


Vara» Alpnaeun Sì, ttuAraw 
prava, 160-WW. Alili* Saturar*. 
p:a L Acri a 


VENDO 

SCAMBIO 

SOFTWARE 


Vendono i scam- 
biano software per 

Spectrum {dove non 
diversamente spe- 
cificato) - contatta- 
re per accordi; 


r«^m« eh* ajg.Lnge 37 nuw Cfr 
manrn u baa * ^nclalr. Prifo atei 
la. via delia &uaidrii. ìt. i»23 
Cfihsrl ITOI, U215S7 Vm tì'tlf 


«Ho zona Rama, Mah 


Roma ami! 


trio, Glanlma (tacchi, ina C kiv 
•Ini 11 K 0. OT1W flùiftt, 
45*2521. 


Jnr.n Rama, tal na, Vllerbo, An- 
drea dai Vadlco. via Imbraccialo 
<24 6'fAJ, 9011» R»ra. 549C0144 


Fini JT. *81® Bwmi 


COMPRO 

CERCO 

VARIE 


Vii Taormina 40. Milana 


Hotel io Damisi, via F dii Udori 
30, 330aO Pramtri atto fUD| r 
04321729022 


C*mprn par Swctium «impili 
IMI bii.-c PìkuI a FflUh. Angera 

Ft incidi, via Cf-in-sn B. 21G-3Ì Cara- 
vai* IV*:. GE'IfcS 1 7n» 


Uri# Alin, «1# Mauri 72 Wl 


Originala Dacalhfon Ocaan a 
13,009. Vari sparlivi diamo San- 
nanara. ufo- Giriti 1 1. 60-1» Fean- 
». 

IV Li I SpSCUum, Aulirmi 
4Ki Soeclrvm rinarri Grilli, Ut Fa- 
lagatta 212, 50017 S, Avo a Ponti 

Zona lumino a bolopnaia. G. 
Dc-Tenico Marchi, via Caduti di 
Cumpgna », 48316 Fi ari ia iRA|, 
2&4&29&U tl 16*21 

UftìtfF par ZX81 « Scracirum. 


muri. Strada Blandii ì, 14019 B.p& (ìiush 20021 Bollato i m i; 

Stararla d i VII lanuova d'Aatl. d-2,i35C4Mfl aop* le 20 


Pm SoacErkm 4 CommdAm 64, ou, impraMesm a htn «uro Mar- 


ra ni a a Cambra eoo. via 


ri JQtHI 43 JO»l 


Tarava Maio, ma MbiemlI t &. 
84036 Saia Cenai ima (SAL 
WTWiWi n. 22221 

Zbm Liguria, Rlcca-foo Venturi. 
Ha falalfo 89. 19190 Impili, 
0i63i»BK2 h. 1130115. 


Coree, panna ottica I ntbi nv 
#eo. Davida Da Mtnmi , via Tffnra 
a fi 329341 Pedarvani iBlj 

PosaladJ 'MisEirllln' n don hai 


I dati da miroduira etra e- penao Ha, 
ma non tifa M furbo, le- ipadiaca 
«40 u inni utili In RAM, nttirr 


a A 8» 2. 320» 


Romagnoli 28>i? i7iOQ Savona, 


Cu [TOgriaTWTU a iifen S»n 
83 - lo ffi MR * manuali Si|iw:Erum 
RnbarlD Ci, Ira zzi. Vis VblOhlan 
d'En -iuun 292, 2Ó09S Sesie S. 0>ib- 
vanni, 0^2463511. 

JifiObn Toranutl Ha S Maria 
21. 06449 Todi, 0T5iiaS35B9 F 
rJraVU- 

■bfiato A w t w . «i A friso 
», «1» Mai una, 00040103 h 
14710 


Pw Qu progrpimml, C#reb1IM O JR 52100 Aiotln 

■i Ai -'j.-Drii I ,. i r ■ IMI ' 


■ ilek pregi imi bile. Scambi' 
progr. mgWBrla eÀtia. Mauro 


Su M crcmn « scanibiQ-ctìmpro 


Wabai Magiiaraohi, via A Blx 
landò luti, '9, 18137 Oanova. 
01B'di&a4.J 


Cambio oltre 200 IMotl par &p*c. 
bum o®n alampsMs o levati» {«si- 
oh# »IVta mlarfnrr, p> Pl*irb Cir- 
della, vico Ffoatnlnl 3. 7401? Moi- 
iole <TA|i 

Si i caeutiuto II Stiratati Club di 
VwC*L<l FLECdp.tO Marce (jorr 
Cri natta 5? mttVaeRì 

■rtajlTTaw 1 ^ 

MalIKUEl 78. SCK naia Coniil.ua, 
99f 5,21 9*1 (1. 2Z>28 

Carau rivi stn au oafrilli, cam- 
bio con scrinare, FranoiMO- Tu- 
acarra, via Salici 1 7, 20124 lagna- 
ne [Uh. 8tJ3i«rr044 

Sera zona tiapcti «« - za 
Mal» a buon puro. Ha rii mg 
turar*, via, ut Ntooilnl ». Ri 41 
Naftoli, avniain. 

Cfr-00 pai SjmcEiuT- CPROM 
raidarfofbBfammsr cimiplafo d! 
afiUwafo. bu-s-buHar «tri muiHaUM 
par giù peri brlGha, InRidveEiiarrra- 
m-or nòe Enzo Carrara, a rt fio 
iRo 2 ùrdom fmoHnt. 2*031 


irti a »n# Hmiirpii p. . 

Ciri, meBBvmi samna Andtaa 
franali, via Righi 3. 43 ' W P 
0521193386. 


Smclatr Comoutar - 6« 


Hit un SintfMf? Per htìfl t»IM 
dii grLpfiD. I serbiti il "Cruf'i:- : Ufi 
i In *1 ori Compilili Slneiilr 
Hipall". Il club più IN' Btnvicl, 
ivi al l 'ade-stat e ne uprel i» più. 
Indirla*™ a Gn*ipa US, Napofi, 
«rlaHTKiG 7 toln tenari, cjp Rpb*. 
lo Cfmwttl. vi LinfiH Aie» te 
«■ti* w «t4tnu «**r 

n « TOIZ^ 


doppia evirali |0y*1ttt Maria a 
Loreio, ina A tirmkr» 14 , DCTIZ 1 
Otiti* Utoim flAHet». 

ScBm&ip'nnnipio programmi par 
MKtìtt*, lallp e MI pipnostlpl 
Eteri* favilli ni li'. Borgia Zardù. 



i. dliagna il efeia 
WluriW ilato de quii (unni agite 
lulilTana, calcoifl la diuatua tra 

I* Farri I q v *l»i**i oggetto. *tC 
Zi ODO con un mutua* Uìi*™ 
ione IwvsKiii na iirai S. ìfioaft 
Vi*r9ggiocLUt.«**'ì9rftJ4 


Cèrto prdprBfnm* di libilo pdr 
Spectrum. page lino ■ 15 .D 00 . Da- 
rio Cium?, wi IV npwmtmB' 5S, 
33DTD CunpagM. l_op-« (VÉ*. 
g*r*ertni * tj» 


gì ftinmat. le per 5 pectru<n a preiiù 


Compre temo regtaluler* par 

IIJW*, Jkdpo Sanruairei, via 
(Uno* 11 4 *H 29 f™™. 


A*ti, gut flati. 


Cdfflprp hnlprtacola 1, Mloièdrl 
VI. diro tniarnoè 7. 1 £HJ 000 Irai II' 
PIU a rivi il * arretrate. Angiolo Ta 
vani, wp felle* Settpgl»! fi adì» 
Bologna 43 BB 4 & 



niPEo tuonMmmjza 


^dl Uniti oMDViiaa lnfo£ 
Il land a Provincia. 


Urrenzo Cunei II. «i Cai lineo 6 . 
xm* Corèico i.m 



C*rpp lolfcrfjcclj ^11 Kh DfO 
grammutHle, non * iailia fcMftfte*, 
Andrea Qualiil, vip Mattoni 1, 
iBClD Corte di PraiHCF^ 

AAA CVBUfi .■ Cheli ■ Con 
gualcate medlMEJ ai Gigli « pnalifel 
a con un wmpo * r. iputn n*g- 
dont pefabtw greca** a avalli m 
P*non Sono ■pp*|*>gn*l'J C 
«■Èchi e off» uni iiuia num» * 

ri* tì riesca Pierre fludlem. via 
Marchese-ri ». 341*2 Trieste. 
IMMIDQSO 


Le EPROM 

|*egi*dapag. t3| 

sogna! a una EEPROM da 2 KByies. 

Arridiamo finalmènle alle 
EPROM: ne esistono 2 versioni, la 
serie 27 a la «arie 25 Difteriscoru 
tra toro nei piedini di coninolo, per- 
tanto non sono intercambiabili, 

Nella fra- 5 vedeie i disegni di al- 
cuni tipi di EPROM, di diversa fami- 
glia e capacità di memoria: Il nume- 
ro dopo le seria Indici la capacità 
della memoria in Kbll, occorre divi- 
dane quindi per 6 p»r sapete il nu- 
mero di KByi«. par esempio la 
2532 ha una, capacita di 4 KBytes. 

Consìglio dì osservare le deferen- 
ze che vi sonò ira i vari tipi dì 
EPROM circa I piedini di con! rollo, 
ricordando che tali differenza non 
sono soto nella ms posizione, ma 
anche nei livelli logici da applicare 
a quei piedini per un corretto lunzto 
namMito. 

Tulli l tipi di EPROM hanno una 
finestrella, attraverso la quale pei 
mazzo dei raggi ultravioletti sì p ut 
cancellare tulio dò Che vi è memo- 
rizzato portando a il* i livelli logici 
di ogni celia di memorie. 

Aiianzieioa: par concedere una 
EPROM, non va bèrta una qualun 
qua- fonte di reggi UV, ma occorra 
una pani col nr u lunghezza d'onda. 

Tante! ivi con I empatìe abbron- 


zanti $1 risolano facilmente con un 
danno ai chip, dal momento che, ol- 
tre al raggi UV. sono presami anche 
gii infrarossi in quinta noi avola {io 
tempo fa ne ho rovinale 6 in un col- 
po solo}. quindi consìglio di procu- 
rarsi una lampada adalla, Inscato- 
larla In un oonien Ilare che non lasci 
passare la luca £l raggi UV fanno 
male egli occhi), e usare solo quella 
fonte di luce per canuflar# le vo- 
stre EPROM 

Per il nostro programma! erre dì 
E prom ci interesseremo solo delle 
25 te e 2532; la Tabelle che si vede in 
flg. 8 non 0 perciò compiei a; preci- 
so Ino li re che i livelli di tensione ap- 
plicati al piedini PGM o CE non so- 
no fissi: il Uvaiio di lon alone neces- 
sario sita prog ram maz ion e viene ot- 
tenuto con un impulso delia durala 
di *5 millisecondi (+f— 5 milli se- 
condi}. la tensione VPP può essere 
presente anche durante la lettura, F 
dall e gli Indirizzi devono essere 
slabi II per lutto il tempo di program- 
mazione. cioè 45 millisecondi per 
ogni Ryie 
(i - continuai 

Sergio tortìglia 


Assembly 

I Étìf^JB -J* POJf tei 

Confronto 
(CP = Compare) 

Abbiamo già accennato a 
questa istruzione m SC n. 08; si 
tratta di un equivalente delia 
Istruzione SUR, con la peculiari- 
tà di non modificare nessun re- 
gistro. 

ì flag sono perù modificati e 
seconda del risultato della sol- 
trazione 

Le va/i enti sono, come per 
SUB, le seguenti: CP ry CP n; CP 
(HL); CP {IX + dJ,- CP ilV + di 

Istruzioni DAA e NEG 

L'istruzione DAA e prevista 
par rendere più semplice la ge- 
stione di numeri nei formato 
BGD, quindi tralasciamo per il 
momento di descriverla. L'Istru- 
zione NEG esegue l'operazione 
di negazione deli" accumulatore 
(LET A = Q-ÀK 

Istruzioni INC e DEC 

INC Incrementa di 1 l'operan- 
do, mentre DEC, ovviamente. 





SINCLAIR ZX SPECTRUM & ACCESSORI 


QL 

SPECIUUII 4 $K: 

INTERFACE t: m RS 222 iwt^ùk.b 

111 i nlf jn'i.-Éi'Éii iVi rutHkr.i'L 

MICRQDRIVE ira infili» «mesa 
y.ate £«b i 

SUPERI ACE: su: i Dend 5 M«Ì 

ampi ic-ti: + crarfacria ,Mi*t s 


EPBOM FRDGHAMMEF; [-.<■ maiv 

im ìm zm' im 2J m at*fa> * 

Sifone. 

INTEHF. R 5 ?i?; rimi Eli afe}** 

5I?r’-=JI; [Tùtoli, .f- 

fNfillF. CINTFCNICS: =:esì 3 ;u alv 
tilt a?tì3^ SHtiasiE EJJlE^atrfdi 

INTIflfc JllTSTICtt: SlftlE 3 :- 


NDVITÀI'f 

FLOPPY DISK DRIVE PER SPFCTflUM 


MQfl-fM: ' . L'iiu-.D il i ; ihei 

BtwHumir kta (iW «4 1 , 1 5 S.Q 0 Q 

VINBrfÀ FtK EORfllSPflNDfNU KHESSO 

SPHDY 

HfcRSÙHAl L li MFL 1 1 E FI PRUGU CTS 5.R.L. 

Via Manti rosa J1 Sa#>* 9 *^l| ini P?-SMS*QT 


stampasi, infilare... «t| whwdw* il calato^, 
ivm kì EEcttf sm 

VENDITA IURETO MIE? SO- 

SftNQV COMPUTER CENTER 
VIA QtìlTAId 14 -TEE. C?-K473G21 
MILANO 


- flciWS Ci C**j« t« i qmin Ih cm n nati 

- Mcmoh : KSJTA ««tic et SBkiitK L 

Aeiuind - 1 :.: ■::mh::f 3 SP » ì s ito* i « «I? ? 

lAPn.i - 'fKEtoc^ ?i tt 33 fti 

KDMARA -SttLCO Vb ; I JAee.Ii] n IJJl ?;■;■+- 

hwesh . - (■.(■ s fctìftftn 'aj fui he h kj mia 



decrementa di 1 l'operando. In 
entrambi I casi, i flag sono mo- 
dificati solo se l 'operando non è 
una coppia di registri; ciò signi- 
fica che il seguente loop 
LDBC,1000 contatore 
LOOP DEC EC BC = 0C-1 

JR HZ.LÓQP IF BC 0 
RET IR EN GOTO 

'LOOP' 

non avrà mai termine, in 
quanto DEC BC non modifica i 
flap quando BC raggiunge O. 

La forma corretta del loop 
prevede l'Inserzione di due 
istruzioni LD A,B; OR C prima di 
JR NZ f LOOP, per provare se i 
due registri B e C hanno rag- 
giunto 0. 

Le varie forme di INC e DEC 
sono: 

1 . Regiater addrèssing; 

me n DEC r; me rr; DEC rr; 
me fX; INC IV: DEC tX; DEC IVf 

2. inpifBct $ddre$$ìng: 

INC(HL); DEC (HL); 

3. Indexed addressing; 

INC (IX -k d); INC (1Y+0. 


Istruzioni 
SCF e CCF 

L'istruzione SCF attiva il flag 
di riporto, mentre CCF ne invei- 
to Io stato (carry = 1 -carryK 

Usando entrambe le istruzio™ 
ni in sequenza^ il flag di riporto 
è cancellalo. Entrambe usano il 
modo di indirizzamento ineren- 
te. 

Possono risultare molto utili 
in programmi aritmetici. 

È con questo finisce la se* 
con da delle puntate compieta- 
mente teoriche; seguiranno 
molti esempi prima di prosegui- 
re con l 'esame delie istruzioni 
ohe appartengono ai rimanenti 
gruppi. 

Gianluca Carri 


ft4 - Sil'CltìV Compi-ter 


l tasti 

(starla pap. SS) 

suaii, presente ite! sistema apBràtivP; 
queste sotlopiogramma produce una 
sequenza di B5535 numeri dìwstEl (èi 
tratta quindi tSi numeri psoudo-caBuali, 
anche se roe&dotaii molle bene). 

Da aqla, la furtziOfta punto un numero 
qìiatela&i delta Sequenza, ogni volta di- 
verso, con un argoménto (positiva Infe- 
riore a 65536) va a puntare sempre io 
stésso numero; par "asitarre" qwstl 
numeri pseurto-caauali si usa RN Divedi 
oltre). 


SYMBOL SHÌFT 

Ultima operatore delia wrle,> . csoé 
"maggiore di". Sn analogia agli altri, 
consenta due quantità e opera una 
scotta In base alla prfcjfilà ttell'una 
sult'allra. 

Cerna per i precedenti, posso con- 
frontare stringhe: Il computar etabilEste 
in questa casa se là poma venga o mé- 
na in ardine al FàbétìCO dopo la seconda. 


CAPSSHIFT 

'T‘ maiuscola. 


MODO "E” 

Otteniamo la funzione RND, che non 
va contusa con flAluDOM IZE: questa, 
abbiamo visto, serve per predisporre là 
routine di calcolo in modo che l' astra- 
zione inizi da un punto prefissato, e si 
possa casi riprodurre una determinala 
sequenza. Veri Ficaie, per es, che dopo 
randQwiize ioo il primo numero esriai- 
ta è sempre o.l 1557007. 

RND è una (unzione priva di argdmen. 
to, é rasili uisce un numero sampré com- 
presa ira 0 é 1 (senza mai arrivare a t). 

La possibilità di ripetere una.sequen- 
za cu numeri pud apparire di scarsa tatHs- 
rb al nuotila: ha invece molle apptlcazio- 
ni di calcolo (statistico, per esemplo)- Vi 
pub servire par provare esaurientemen- 
te un programma senza essere costretti 
a noiose teoria di input. 

H range ani re cui spaziano i numeri 
può èssere facii manta controllato: ba- 
sta moltiplicare RND par una cOSlante 
oppof trinatamente scalta: sa si mantie- 
ne 0 come Firn ite inferiore, il fattore cor- 
risponde all'eslremo superiore: 7 ' R N D 
spazia tra D e 7, estremi esctusì. 

Vaiando invéce un Intervallo qualsiasi 
a.i (s minore di &}, scrivete 

a + (fra) 'ANO 


Ancora, Sé volete numeri inieri, usate 
INI ù?*FND>, ricordando però che INT 
arrotonda par dilètto: volendo Includerà 
anche n bisogna sommare 1. 


SYMBOL S, in ,L E IS 

L'ultlrno comando disponibile su |L T" 
è biERGE, relativo alle operazioni con 
régislralore q Mteradriva: Sérvé per uni- 
re due programmi in basic, uno già nella 
memoria dèi calcolatore a uno Sul uà- 
atro. 

La sintassi è semplicemente MERGE 
- 1 ”, per caricare FI primo programma eòa 
varrò incontrato, O M£FÒ£ "npnw' r se il 
fife deve essere corcato. 

i due programmi veggono fusi Inaia- 
rne, net senso più letterale del termina: 
SO H computer incontra numeri di linea 
uguali, le istruzioni dal programma già 
in memoria vangano persa, e sostituite 
con quelle in arrivo; altrettanto accade 
per eventuali variabili InlziaFizzate. 

Il vantaggio di non dover riscrivere 
ogni volta routinéS di USO frequente è 
evidente: abitandosi a riservare una 
parie della numerazione (per es. prime 
del 10000 per questi scopi si eviterà dL.~ 
colare a picco i programmi, invece di 
fonderli, 


Arrow of death 

(segue Ca pap 20 1 

Ecco bove prenderemo il pezzo 
che manca per compiei are la frec- 
cia, Lasciamo II libro, che non et 
serve p-iù, e recuperiamo la spada 
(drop hook ■ gel sword.). 

Torniamo al luogo 42 fu-s-eh quin- 
di andiamo di nuovo ad est (e} (47). 
Digitiamo go march (46).. quindi est 
(e! (49) e nord (n). Eccoci di Fronte al 
salice sacro (5Ct). 

1:1 guardiano non ci permette rii 
coglierne un ramo, ma noi sappia- 
mo che è bramoso d'argento, e ìe 
medaglione che abbiamo con noi è 
proprio d'argento. Lanciamoglielo 
{throw fnetiaMon) eri ecco superato, 
un po' all’Italiana,, rostacolo; taglia- 
to a e ramo del salice fcyi wiflow % 
abbiamo ora te tre parti della frec- 
cia sacra, 

Et computer -ai congratula con noi 
e ci invita a proseguire la storia in 
Arrow ol tfeaffv {Pari iwo). 

Giuliane Boschi 



lizzate 

: tagliandi 

par abbonarvi. 


ciiie dere o 
darci consigli, 
pubblicare 
un 'inserzione 
pr comprare, 
rendere, 

«rea re 
Intatti, 

legnate 
i spedite 
In busta 
chiusa a: 
Pttlair 
Éomputer, 
viale 

furia g osta 75, 
10142 Milano. 


Avvertenze: 

ABBONAMÉNTI: scrivete l'Indù 
:lrzo compì ala 

COLLABORAZIONE; Il listato non 
j in :!is pensai) ile. la cassetta si. 

HELP: non accludere frariCtfbQi- 
f ner rispondila mo privatamente 
ì INSERZIONI: le rubrica A desti - 
itfa agli scambi Ira privati; la ro- 
tolane si riserva il tfiritto di paci- 
fere o cesti n a re gli annunci paté - 
«mente ; 


Registrate il m«d abbonamento annuale a 

SÌOtìtìlr Cofl^arter (L 20.000) IJ Computer + Sinclair Computer (L55.MW) 
n Nq ve^MloUmpomo sut G'C posisi* n. 30426209 
□ Accludo assegna non Iraslerifciile n. benoa 

iniettato a; Sinclair Computer, v ie Famagosta 76 - EOI 42 Milano 
li mio computer e □ zxai Q Spetìrum □ 
possiedo SI NO Wome 

campante I : Q Vi0 n 

CAP. M I M I città 
Tel pnw. 


ABBONAMENTO 


microdrive □ □ 
joystick □ O 
□ □ 


IN e LAbbOrtamenfa è annuale (1 1 flumenl e decorra dal piimo n^nero edito ttopo il -lenimento della sctloscnzigne. 


Desidero Elaborare a Sinclair Computer 
Invio il programma. . . 

Sfilalo e registrato su Cassetta, con un articolo di commento. 

G a rari lis Co che il software è originale e vi autorizzo a pubblicarlo. 
Par H compenso scrivetemi al seguente indirizzo: 


COLLABORAZIONE 


Via: . 

CAP. M ill i .città _ prov, 

Te l ■ - ■ „ 


N,B. Il materiale anche non pubblicato non viene 


Ngme 

Via 

CAP. INNI città 
Tei. 


Questo mese ho actpjlslalo f provalo i seguenti programmi 
all valute cosi (max tre tiipfrf: 


TITOLO 

Ottimo 

Buono 

Meokoe 

Deluderne 

















e e indifJza? (facoltativo) 


□ vùNCQ 

□ CQMPFtO 

□ _ 


Nome 

Vte _ ... 

CAP. l_l_LLU crttà 
Tel. 



In omaggio 
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Hobby & home 
Portatili 









Trasportabili 


Micro & mini 

Supermini e 
mainframe 



19-23 APRILE 1985 - T FIERA DI MILANO 






I 



Ogni anno circa due milioni di persone 
visitano la Fiera Campionaria di Milano. 
Dal 1 985, ad attenderle, ci sarà 
COMPUTER SHOW 
il nuovo Salone interamente dedicato 
aH’informatica per i giovani, la scuola, 
la famiglia moderna. Sicuramente sarà 
il più grande appuntamento dell'anno. 

Perché non esserci? 


Segreteria: 

E. FI - ENTE PROMOZIONE INFORMATICA 
Via Marcchetti, 27 - 20139 M il uno 
Telefoni 1021 56.93.973 - 53,9&.2ó7 


la mostra per: 

l’ hobby 
la didattica 
' videogiochi 


